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RE A SUA 
RAFBA 



ACRESCENTE NUMEROS 



ATECLA < SHIFT > 



DESENVOLVA UM RITMO 



REGULAR 



VELOCIDAOEE PRECISAO 



Divirta-se com urn joguinho de a^So 
r^piida e aprenda ao mesmo 
tempo a trabaltiar com as teclas de 
niimeros, ampliando a sua 
habilidade como datildgrafo. 



Depois dc ter estudado as duas pri- 
meiras ligoes de datilografia, voce ja esl^ 
provavelmente familiarizado com as te- 
clas de letras e com os sinais de pontua- 
j^ao das tres fileiras inferiores do tecla- 
'do. At6 a^ora, porem. nao locamos nas 
importantes leclas num^ricas (iiiuilo 
usadas. afiis. na digitacJio de pro- 
gramas.) 

Da mesma forma, ainda nao ensiiia- 
mos as formas de manipulai^ao das te- 
clas para se obier lelras maiusculas ou 
miniisculas, nem cxplicamos os sinais de 
ponlua^ao adicionais e demais sfmboEos 
disponfveis no teclado. 

Esta Ucao sera dedicada as leclas ain- 
da nao esludadas. Nela, apresenlaremos 
lambem um pequeno e divenido exer- 
^dcio, que fari com que voce melhore a 
sua velocidadc, precisao e ritmo no ira- 
balho com o lecEado. 



ACRESCENTANDO OS NUMEROS 



Para ireinarraos a datilografia com 
a nieira do leciado que contem os alga- 
rismos, basia fazer algumas modifica- 
coes no programa apresentado nas li^oes 
anteriores do curso (pagitias 253 e 276). 

Desta forma, carregue o uliimo pro- 
grama utilizado e digite as linhas adicio- 
nais, expostas a seguir. Como voce ve- 
ra, algumas delas irio apenas substttuir 
linhas jd exisientcs. ao passo que outras 
serao adicionadas ao programa: 




30 LET S$--1A2S3D4F5C6H7J8K9L 

0- 
210 FOB K-$ TO 24 
230 LET BS-S5tK-5) 
320 LET HN-INT (BND''19) 1 
330 PRIMT AT 10 .HN-i-S ; """ : LET 
BS-SS(RN) 
350 PRINT AT lO.HN+5;* " 



440 LET EN-INT (RHD*19)+1 

530 PSINT AT 10, 13:;"' 

-; PRINT AT 1 , 1 3 ; T5 

540 FOR M-l TO LEN TS : PRINT 

AT 9.H+M;" * 

610 FOR N-1 TO 5: RESTORE : 

LET RN-INT CRND*24)+1: FOR K-1 

TO RN: READ KS: NEKT K 
1010 PRINT AT 12.6;SS 
2000 DATA "MCeeogE" ."VALOR". "UL 
TIHO-.-zeOA"."RELAXE-. "650Z" ."A 
37X2" ."1024". "VASTO-.-JUNCO" .'H 
ETORNO", ■■67VDG" 

2010 DATA "ARENAS", "AGITADO" ,"7 
4LS83","REDONDO" ."LINEAR" ,"1986 
". "30123". "CQNGELAD0".-4MHZ"."W 
XlOl" ."64MB", "VIDEO" 

Q 

10 OB3-'lA2S3D4F5G6H7jeK9L0:-:" 
210 AP-12S2 

220 FOR K-1 TO 22 

320 AP-1252+RND(22) 

430 P5-MID$ (06S.RND(22) .1) 

1020 PRINT $261.08$ 

9000 DATA MC6809E.VAL0K. "ULTIMO 

:■ .ZBOA.RELAXE. 6502. A37XZ,- 1024 

.WASTO, JUNCO 

9010 DATA RETURN.A847UDG.145.22 

."APENAS,", AGITADO, 74LS83,-93.4 

1,RED0MD0, LINEAR 

9020 DATA PROCESSO.CONGELAOO.TR 

AZ . 1986 , DESENHO , SANGUE , 942 . 52 , " 

301.123".350KG 



,TRAZ, 19&6, DESENHO. SANUUE. 642 .5 
2,"30L,23",350KG 



10 OBS - "lA2S3D4F5O6a7J8K9L0; : 

210 AP - B 

220 FOR K - 1 TO 22:AP - AP + 
1: GOSUB 1100: NEXT 
320 AP - 9 + IHT ,( RND (1) * 2 
3) 

420 FOB K - 1 TO 20:PS - MIDS 
(OBS. INT ( RND (1) ' 22) + 1. 
1) 

640 P - 1: UTAB 11: HTAB 2: PRI 
NT PS 
660 UTAB 15: HTAB P + 1: PRINT 

MIDS IPS.P.l) 
1010 VTAB 12: HTAB 9: PRINT OB 
S 

9000 DATA MC6809E.UALOR,"ULTI 
MO:-.zaOA.RELAXE.6502.A37XZ,-10 
24, UASTO, JUNCO 

9010 DATA BETURM , Ae4 7VPG , 145 . 
22 , -APENAS, " .AGITADO . ?4LS63 , -93 
. 41. REDONDO. LINEAR 
902O DATA PBOCESSO, CONGELADO 



r^ 



10 OBS-"lA2S3D4F5G6H7J8K9L0g-" 

;ZS-CHRS(219) :SS-"L10 02 G" 

210 AP-355 

220 FOB K-1 TO 22 

320 AP-3S6+INT(BNDa)*22) 

430 PS-MIDS(OBS.INT(HNDtl)*22)' 

1,1) 

1010 LOCATE 2,12; PRINTOBS 

9000 DATA MC6809E,yALOR, "ULTIMO 

:",Z80A.RELAXE, 6502, A37XZ. -1024 

, UASTO, JUNCO 

9010 DATA RETURN, AB47VDG, 145. 22 

, "SOMEfJTE , ■■ , AGITAR , 74LS83 , -93 . 4 

1 .CIRCULO, LINEAR 

9020 DATA PBOCESSO .FBIO ,THAZ, 19 

86 , DES ENHO . SANGUE , 84 2 . 5 2 . CACA . 3 

50 KG 

Quando o programa tor rodado, um 
metiuconlendo oscinco iiiveisjaconhe- 
cidos sera apresentado na lela; voce de- 
vera eniao optar por um deles. Como 
das vezes anteriores, exislirao muitas 
combina^ocs possiveis, dependendo do 
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nuiii<;ru di; it;cU^ a scrcm induidas nos 
exercicios . Nos nivcis mais baixos de di- 
ficuldade, o computador propora exer- 
cicios cm que as icclas numexicas c. al- 
gumas vezes, de pontuacao serao com- 
binadas aleatoriamenie com as outras 
teclas. que voce ja conhece das duas pri- 
meiras li9des. Essa combinafao dificul- 
tara as coi^s para voc%, e o obrigara a 
nio se concentrar apenas na& teclas nu- 
mericas. 

Nos ni'veis mais altos de diTiculdade. 
o computador pedird que voce dlgile 
uma mistura de palavras, grupos de nii- 
meros e combinagoes de letras e algaris- 
mos. As palavras e niimeros seleciona- 
dos s&encontrami nas decIaracSes DA- 
TA, quase no final do programa, Eles 
podem ser trocados. caso voce queira 
aumentar o desafio depois de se fami- 
liarizar bem com os exercicios originais. 
Emrecanio, lembre-se de manter o mes- 
mo miinero de palavras (ou grupo de ca- 
racleres); do contrario, ocorrerd um er- 
ro de cxecucao quando o programa nao 
cncontrar o niimero correto de iiens em 
DATA. 

Uma vez dominadas as Teclas nume- 
ricas, passe para a iigao seguinte, cujo 
objelivo e praiicar com os caracteres 
acessiveis apenas por intermedio da te- 
cla <SHIFr>. 



AS LETRAS UAlOSCULAS 



A tecla < SHIFT > corresponde k 

alavanca de maiusculas de uma maq ul- 
na de escrever comum. Em alguns com- 
putadores, essa fun^ao tambem pode ser 
desempenhada pela < CAPS LOCK > . 
Para aprender a usd-las, adicione as li- 
nhas abaixo a ultima versao do progra- 
ma (novamente, algumas linhas serao 
inteiramente substituidas): 



20 POKE 236S8, 
30 LET S$-"fcla 
J'3K{kL)I0" 
210 FOa K-2 TO 
230 LET RS-SS(K 
320 LET BN-INT 
330 PRINT AT 10 
RS-SS(HN) 
350 PRINT AT 10 
440 LET RN-INT 
610 FOR N-1 TO 
LET HN-INT (RND 
TO RN: BEAD XS : 
1010 PRINT AT 12 
2000 DATA 'S235. 
H120O',-23.5t 
",''EleB''.-lSei.l2 
+9-1D" ."*«Obs"*" 
2010 DATA 



0: LET ER-0 
seaDtdFSCGtgHiLh 

29 
-1) 

(HND*28)+1 
,RN+1:""": LET 

,RN+1;" " 
(HND«28)+1 
4: RESTORE : 
■24) -H: FOR K-1 

NEXT K 
.2iSS 

50", "PRINT*". "S. 
Conta-.-LONDRES 
" Cabaixo)-, "H 
Fogol ! " 

Extra" ."Bfti 



jd-f lor' ."Lugar". "4*4-16". "QueB 
?• ,"6; 10pm" ."Nob" ,"S15.40" .'Dir 
igir-."ATEMCAO*," 100/4" 

D 

10 OBS-'!A"-*-CHHSt34)+"S»DSFIGi.H 

•J(K)L*-t-- 

20 POKE 282,0:CLS 

2L0 AP-1250 

220 FOB K-i TO 21 

320 AP-1250+BNO(21) 

430 PS-MIDSC0BS.RNDC21) .1) 

999 POKE Za2.255:CLS:END 

1020 PRINT §259, OBS 

9000 DATA P&INTt.MoBtre,&.H4000. 

Fora! ! . (abaixo) ,H+9-lD, 3500. 10, 

D/lOOt.EIeB.x-oba"" 

9010 DATA Extra. Caroa.DIABIO, Co 

nta.Mea , Respoata. Ho je.Gerente.S 

etor 

9020 DATA LONDRES , Concha . Toque . 

!-; ;- J .SucesBo.Bei ja-f lor .Luaar 

.Caapo.Direto 



S 



10 OBS - "!A' * CHRS (34) + "S 

|DSF*Gi.H'J(K)L+"-<>7" 

220 FOR K - 1 TO 24:AP - AP * 

1: COSUB 1100: NEXT 

320 AP - 9 + INT ( BND (1) • 2 

5) 
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420 FOR K 
(DBS. INT 
1) 

9000 DATA 
oral [ . {abai 
OO.lO.D/100 
9010 DATA 
Conta.Mea.H 
. Setor 
9020 DATA 
e, ;-;;-;. Su 
ar.Cdmpo.Di 



- 1 TO iO;PS - MID3 
( RND tl) • 24) + 1. 

PR»,Moatre,SH4000.F 
xo) ,H + 9 - ID.CzS 5 
»,Ele9."*0ba*« 

Extra.Cdrga.DianOi 

o je.Reapoata .Gerente 

LONDRES , Concha . Toqu 
ceaso. Bei ja-f lor , Lug 
reto 



i fA<i 



10 OB$-*!AeS|D5FtG-+CHR5C34)+"H 

tJ«KCL)C_+?>":ZS-CHaS (219) :SS-" 

LIO 02 G- 

220 FOR K-1 TO 24 

320 AP-356+INTCRND(l) -24) 

430 P$-MIDS(OBS.INT(RND(l)«24)+ 

1.1) 

9000 DATA PRINTI. Nostra. t.H4000. 

Fora! 1 , (abaixo) .H + 9 - ID.CzS 

SOO.lO.D/lOOt.EUa,"* 0b8 «• 

9010 DATA Extra. Cargo, DIARIO. Co 

nta.MCs.Resposta.Hoje.Gerente.S 

ec3o 

9020 DATA LONDRES. Concha, Toque, 

; ?;?,Siice33o,Bei ja-f lor .Lugar .C 

aapo.Guia 



cla <CAPS> csia desativada. 

Os niveis mais baixos de dificuldade 
do programa apresenlam agora os ca- 
racteres que siS estao disponiveis quan- 
do as leclas sao pressionadas simutta- 
neamenle com o comando < SHIFT > : 
ponlua?ao, simbolos maiemaiicos, etc... 
Eles esiao misiurados com as letras da 
fileira central do leclado, o que signifi- 
ca que voce deve relornar a eles toda vez 
que press iona-los. 

Nos niveis mais altos sao apresenia- 
dos palavras e grupos de caracieres de 
uma lisia interna, lal como antes; ago- 
ra, porem, voc5 encontrari as letras 
maiusculas e outros simbolos que so po- 
dem ser obiidos com o < SHIFT > , mis- 
turados com as letras minijsculas. 

Conhecidos esses exemplos particu- 
lares de teste, substitua as dcclaratdes 
DATA por um novo conjunto de dados 
(lembre-se de manter o mesmo niimero 
total de palavras). 

Passe para a prdxima se^ao apenas 



datiiogialia cuoiiiic t-m pressionar is le- 
clas ao compasso de um metronomo 
{instrumenio que serve para regular os 
andamentos musicals). Este deve ser 
acelerado a medida que o movimenio de 
seus dedos se lornar mais rapido e 
preciso. 

Mas por que dar-se ao trabalho de 
utilizar um metronomo, quando o seu 
computador possui um relogio embuti- 
do? O proximo programa e um novo e 
compkio exercicio de digiiacao. plane- 
jado c'omo um jogo, onde a contagem 
depende do seu desempenho no leclado. 
Ele 6 composto por duas partes, A pri- 
meira, exibe uma linha de caracteres sc- 
lecionada alealoriamente — voce tem 
que digitar, em seqiiencia. os caracteres 
k medida que forem aparecendo. A se- 
gunda parte 6 mais dificil — agora, os 
caracteres sao lan^ados alealoriamente 
na tela, um por um; destc modo. vocfi 
nao tem idiia do que vira a seguir. 




O TRS-Color n§o Imprime letras mi- 
niisculas na tela. Em vez disso, cxibe-as 
em video inverse (letras cJaras sobre 
fundo escuro). 

Nos micros da linha Apple que dis- 
poem de minijsculas, mude a lecla sele- 
tora para minusculas ao digitar as linhas 
DATA. Infeli^mente, os micros da linha 
Apple 11 + padrSo, que nao contam 
com letras minusculas, nao conseguirSo 
rodar o programa a seguir. Nos micros 
da linha MSX, ceriifique-se deque a (e- 



quando eslivcr cnconlrando — sem he- 
sitacao e sem olhar para o tcclado — to- 
dos OS caracteres com que treinou. 



JOGO DE VELOCIDADE 



Um dos modos mais eficazes de se 
melhorar a precisao e a velocidade de 



Antes de iniciar o teste, selecione o 
seu proprio m'vcl de dificuldade. Isso de- 
ve ser t'eilo dizendo-se ao computador 
com que velocidade voce qucr que as le- 
tras sejam exibidas — em oulras pala- 
vras, quantos caracteres por minuto vo- 
ce qucr digitar. Emao, o computador es- 
labelecer^ um tempo limiiado, dentro 
do qual voce deve digitar cada caracte- 
rc; do contrario. sera emitida uma con- 
tagem dc erros. No primeiro nivel, isso 
e feiio por intermedio de um indicador 
movel que moslra qual lefra deveria es- 
tar sendo digitada; no segundo nivel, o 
caraclerc e iluminado por algum tempo. 

Ao come^ar o primeiro teste, voce 
pode escolher sc quer o teclado normal 
(com letras, apenas) ou teclado comple- 
to (com todos OS simbolos). E antes de 
passar para o segundo nivel (o teste dos 
caracteres) voce deve decidir quanto 
tempo e capaz de susicnt^-lo. O compu- 
tador perguniar^ quanios caracteres, no 
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total, voce quer que fagam pane do 
teste. 

Imediaiamente depois de ler exibido 
Eodos OS caracteres, o computador pa- 
rara e fornecera uma contagem basea- 
da nos seus errqs. 

Nao 6 apenas a velocidade total de di- 
gita^o no computador que eonta nesse 
teste de desafio: voce precisar^ tambem 
desenvolver urn ritmo constante. Para 
ajuda-lo a adquirir esse ritmo, o com- 
putador dard utii sinal sonoro assim co- 
mo um sinaJ visual de prontidao para ca- 
da leira. 

Agora digiie o programa propria- 
mente dito, e teste a sua habilidade co- 
mo datil6grafo: 



10 BORDER 7: PAPER 7: INK 0: 

CLS 

20 LET aS-"AflCDEFGHIJKLHNOPQH 

STUVUXYZ" 

30 LET aS-aS+'abcdefqhi jKlmno 

pqrstuvw^tyi" 

40 LET aS-aS+"1234567890!eiSt 

f {)" 

50 LET aS-aS+CHRS (34)+"<>:-+ 

-"?/•. -■ 

60 PRINT INVERSE 1 ;AT 6,7;" 

TESTE 1 OU 2 7 " 

70 IF INKEXS-"" THEN GOTO 70 



80 LET iS-INKEYS: IF iS-"2" 

THEN GOTO 400 

90 IF 1S<>"1" THEN GOTO 70 
100 CLS : INPUT "Quantoa carac 
Eereg por niinuto? " : cpB 
110 LET t-SOOO/cpB 
120 LET aS-"" 
130 FOR r-1 TO 30 
140 LET aS-3S+aS(INT (RND*84)+ 
1) 

150 NEXT n 

160 PRINT BRIGHT 1;AT ll.I;a5 
200 GOSLTB 800: LET er-0: FOR r 
-1 TO 30 

210 POKE 23672,0: POKE 23673.0 
220 PRINT AT 10,r-lr" •" 
230 SOUND .02. 20 
240 IF PEEK 23672+256*PEEK 
236?3>-t THEN LET er-er*l: 



GOTO 300 

250 LET iS-INKEYS: IF iS-"' 

THEN GOTO 240 

260 IF iS-s$(r) THEN PRINT AT 

12, r;"'": GOTO 280 

270 LET er-er+l 

280 IF PEEK 23672+256"PEEK 

23673<t THEN GOTO 2B0 

300 NEXT r 

310 PRINT AT 16,3;-VOCE EBROU 

";er;" DAS 30" 

320 FOR f-1 TO 200: NEXT I 

330 GOTO 20 

400 CLS : INPUT "Nuniero de tec 

las por minuto? " ; cpb 

410 INPUT -Numero d^ caractere 

a?' :r 

420 INPUT '(N)oiriiial ou (E)aten 

dido7 ": LINE mS 

430 IF niS-"N" OR iiiS-''n'' THEN 

LET aS-aS[ TO 52): GOTO 450 

440 IF raSO'E- AND inSO'e" 

THEN GOTO 420 

450 LET t-3000/cpm 
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460 G0SU8 800 

470 LET er-0 

4B0 FOH n-1 TO r 

490 POKE 23672.0: POKE 236?3.0 

500 LET r5-a$(INT (BND*LEN aS) 

+1) 

510 PRINT INVERSE 1;AT 10,15; 

rS; INVERSE 0;AT 11,15;" ' 

520 SOUND .02.20 

530 IF PEEK 23672+256«PEEK 

23673>-t THEN LET er-er+1: 

GOTO 580 

540 LET iS-INKEYS: IF iS-"" 

THEN GOTO 5 30 

550 IF iS-rS THEN PRINT AT 11 

.15; -""; GOTO 570 

560 LET er-er+1 

570 IF PEEK 23672+256"PEEK 

23673<t THEN GOTO 570 

580 NEXT n 

590 PRINT AT 16,3i"VOCE EHROU 

":er;' das -;n-l 



30 PRINT #102."DIGITE (0) PARA 430 

SAIR" 440 

40 AS-INKEYS:IF AS<"0" OB AS>"2 450 

" THEN 40 0,1 

50 ON VAL [AS)+l GOSUB 1000.600 460 

.200 470 

60 POKE 282.255 4B0 

70 ER-0:WS-"":B5-"" 490 

80 GOTO 20 490 

200 CLS;INPUT"DIGITE QUANTAS TE 500 

CLAS PRESSI0NADA3 POR MINUTO" ; K 510 

P CLAS 

210 IF KP<1 THEN 200 520 

220 INPUT "DIGITE NUMERO DE C iNM 

ARACTERES ';NC 530 
230 IF NC<1 THEN 220 
240 NM'NC 



TIMER-0 

AS-^INKEYSrlF AS-" THEN 460 

BS-AS:IF BS-WS THEN SCREEN 

IF TIMEHCTM THEN 440 

SOUND 150. 1 

IF BSOW3 THEN ER-ER+1 :GOTO 

POKE 1295.128 
NC-NC-1:IF NOD THEN 400 
CLSiPHINT §448, "COM" ;KP; -TE 

PBESSIONADAS POR MINUTO" 
PRINT "VOCE ERROU"; EH; "DAS- 
RETURN 




NEXT t 



) 

^^600 FOR f-1 TO 200 

' 610 GOTO 20 

800 LET cS-"5. .4. . 3. .2. .1 . .0- 

810 FOH n-1 TO 16 

820 PRINT AT 2.5+n;c$CnJ 

830 PAUSE 10 

840 NEXT n 

850 SOUND .2.10 

860 PRINT AT 2.0; TAB 31;" " 

870 RETURN 

Q 

10 CLS 

20 PRINT e70."QUAL TESTE (1 OU 
2) ?" 



250 PHINT:PRrNT"NORMAL OU ESTEN 

DIDO CN/El ?" 

260 AS-INKEYS:IF AS<>"N" AND AS 

O-E" THEN 260 

270 RN-90:ST=32:IF AS="N" THEN 

RN-58:ST=64 

280 POKE 262,0 

290 TM'3000/KP 

300 CLSO: PRINT" PRESSIONE A TEC 

LA DEPOIS DO BIP " 

310 PRINT #238." "irPRINT §27 

0," " : :PHINT §302," "; 

320 WS=CHRS(BND{RN)+ST) 

330 IF W3>"Z" AND W5<'a" THEN 3 

20 

340 PRINT §271. WS; 

350 TIMER-0 

360 AS-INKEYS:IF AS="" THEN 380 

370 BS«AS:IF BS=US THEN SCREEN 

0.1 

350 IF TIMER <TM THEN 360 

390 SOUND 150.1:IF BS="" THEN 3 

50 

400 WS=CHHS[HND[RN)+ST) 

410 IF WS>'Z" AND WS<"a" THEN 4 

00 

420 PRINT §271, WS; 



600 CLS: INPUT"DIGITE QUANTAS TE 

CLAS PRESSIONADAS POR MINUTO" :K 

P 

610 IF KP<1 THEN 600 

620 PRINT:PRINT"NORMAL OU ESTEN 

DIDO [N/E) 7" 

630 AS = INKEY5:IF AS-C>"N" AND A3 

<>"E" THEN 630 

640 RN-91 :ST-31:IF AS^ 

RN=5«:ST=64 

650 TM=3000/KP 

660 CLS;POKE 282.0 

670 FOR K=l TO 32 

680 CP=RND(RN)+ST 

690 IF CR>90 AND CR<:97 THEN CR = 

32 

700 WS-WS+CHRS ICR) 

710 NEXT 

720 AP=1248 

730 POKE AP, 106 

740 PRINT e256 . WS 

750 TIMER=D 

760 AS-iNKEyS;IF AS-"" THEN 7Q0 

770 B$=AS 

780 IF TIMEB<TM THEN 760 

790 SOUND I50.1:IF BS-"" THEN 7 

50 

800 TIMER=0 

810 AS-INKE!($:IF AS'"" THEN 830 

820 BS-AS 

830 IF TIMER<TM THEN 810 

840 SOUND 150, 1 

850 IF BS<>MIDS(WS.AP-]247, 

HEN ER=ER+1;G0T0 960 

855 POKE AP+64 .94 

860 POKE AP.96 

870 AP-AP+1 
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880 IF AP-12aO THEN 910 

890 POKE AP,L06 

900 BS-"* !GOTO 800 

910 CLS:PHINT ^481 . "COM" ; KP ; ' 

CLAS POH MINUTO" 

920 PH1NT"V0CE EHROU" i EB ; "DAS 3 

2" ; iHETUHN 

1000 CLS 
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10 CLS;ZS-CHRSC219D ;E-RND(-T1HE 

) 

20 LOCATE 5,3:PB1KT'8UAL TESTE? 

(1-2)- 
30 LOCATE 5.4 :PRINT"DIGITE <0> 
PABA TEH«I^AR■ 

40 AS-INKEY5:IFAS<"0"ORAS>"2"TH 
EN40 

50 on val(as1+1 gosub 1000,600, 
;;do 

60 EH-0:WS-"" ;BS-"" 

70 GOT020 

200 CLS:INPUT"TOQUES FOR MINUTO 

"iKP 

210 IFKP<ITHEN200 

220 INPUT-NOKERO DE CARACTERES" 

;KC 

230 IFNCC1THEN220 

240 NM-HC 

?50 PRINT :PRINT"TECLADO: LETRAS 

OU TOTAL (L/T) 7" 
260 Ag-INKEYS;IFAS<>"L"ANDAS<>'* 

"THEN260 

70 RN-90 ;ST-33;IFAS-"L"THENRN- 



58;ST-65 

280 TM-3600/KP 

300 CLS:PHIWT"PHESSIONE A TECLA 

APdS BIP" 
310 L0CATE15. 10;PBINTSTBIHC5(4. 
219) 

320 LQCATE15:PRINT25:' "iZ? 
330 L0CATE15: PRINTZS ; " " : ZS 
340 LOCATE15:PRINTSTHINGS(4.219 

) 

350 WS-CHBS(RND(1)'«RN+ST) 
360 :F WS<''Z"ANDWS>''a"THEN350 
370 L0CATE17, 12:PHINTUSi ;TlME-0 
380 AS=INKEYS:rFAS-""THEN390ELS 
EBS-AS:IFBS-WSTHENCOLOS15,6 
390 IFTIt1E<TMTHEN380El.SEBEEP:IF 
BS-""THEfJ370 
400 IFBSOWSTHENEH-EH+l 
<10 COLOR 15,4,4 
420 NC=NC-L :IfNC>OTHEN350 
430 CLS:LOCATE2.12;PRINT"A" ;KP; 
"toqviea por mmuto, voc6 errou" 
jER; "em" ;NM 
44 RETURN 

600 CLS; INPLrT"TOOUES POH MINUTO 
■■;KP 

610 IFKP<1THEN60C 
6Z0 PRINT :PRINT"TECLAD0: LETRAE 

OU TOTAL? (L^T)" 
63 AS-INKEVSiIFAS<>"L"ANDA$<>- 
T"THEN630 

640 BM-91 :ST-32:IFAS-""L"THENRN' 
58:ST-65 
650 TM-3600/KP 
660 CLS:F0RK=1T032 
670 CB-1NT(RND(1J«HN)>ST 
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COMO AUMENTAR A VELOCIDADE 
DE DIGITACAO 

Conv6m comecar a execugSo do 
programa de jogo de velocJdade com o 
teclado normal e a uma velocidade bai- 
xa ipor exempla, de cerca de Irtnta a 
cinqiJenia caracteres por minuto). Ao 
mosmo lempo. procure nao alterat o rit- 
mo de trabalho, digitarido com a mes- 
ma velocidade tanto os caracteres co- 
nhecidos como os que Ihe sao menos 
familiares (esse conselho vale phncipal- 
mente para quando voc€ estiver com 
teclado compleio). 

Se seu ritmo se mantiver constan- 
te, vocg poderS selecionar o tedsdo 
COmpletoe aumentar. gradaiivamente, 
a velocidade de digita^ao, 

Outra coisa muito importante para 
quern estd aprendendo a datilogr afar 6 
fazer todos as exercfclos proposlos 
sem olhar para o teclado do com- 
putadar. 

Mantenha os seus olhos fixos todo 
tempo na tela S sua frente, e repou- 
se as m§os sobre o tGclado, distribuin- 
do OS dedos pelas teclas de apoio da 
fileira central, contorme ensinanios na 
primeira licao. 



680 IFCH>90ANDCR<:97THENCR-32 

690 WS-W$+CHRS(CR) 

700 NEXT 

710 AP-S64 

720 UPOKEBASE(O)+AP.205 

730 LOCATE3,15:PRINTWS 

740 TIME-O 

750 AS-INKEY5:IFAS-""THEN760ELS 

EBS-A5 

760 IFTII1E<THTHEN750 

770 BEEP:IFBS-""THEN740 

780 IFBS<>«IDS(WS,AP-563,1)THEN 

ER-EB+IELSEVPOKEBASE (0)*AP+e0.1 

790 VPOKEBAS£{0)+AP.O:AP-AP+1:I 

FAP-596THEN810 

800 VPOKEBASE(0)+AP.205:GOTO740 

BIO CLS-.LOCATE2,15:PHINT"A" ;KF: 

"toques por minuto, vocfi errou" 

;EH;'de 32" 

820 RETURN 

1000 CLS 



FACA TODOS OS EXERCICIOS 



Para adquirir um conhecimenio pro- 
fundo de lodas as teclas de caracteres 
pralique todos os exercicios apresenta- 
dos al^ agora. Esta parte do curso i ifl- 

dependenle, Entretanto. em um artigo 
posicrior, voce lerd oporlunidade de 
praticar suas habilidades com aJgumas 
frases e senten?as. 
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JOYSTICK! 



Sistema de controle dos mais vers^teis 
e baratos, o joystick 4 urn 
perif^rico que serve tanto para 
aplicaqoes "s^rias" como para 
tornar os jogos mais interessantes. 



COMUNiQUE-SECOWO 



COMPUTADOR 



COMOUTILIZAR UM JOYSTICK 



TIPOS DE JOYSTICKS 



Embora eslejani fic-ando cada ves 
mais sofisticados, os cotnputadores do- 
mesticos ainda nao conseguem dar ins- 
trutoes a si mesmos. Por enquanto (e es- 
peramos que para sempre...), a respon- 
sabilidadedisso recai inteiramenK sobre 
o programador ou o usuario. Aprender 
a programar e, portanto. aprender a se 
comunicar com o computador. 

O principal meio de comunica^ao do 
usuario com o computadof continua 
sendo o leclado. Mas existem muitas ra- 
zees para considerar esse meio como 
longe do ideal: a principal delas e que 
o leclado torna a comiinica^ao compa- 
rativamente lenta em relai;ao a oulros 
metodos. Alem disso, o uso eficiente do 
ledado exige que o usuario aprenda a 
digilar com rapidez e precisao. 

Cos(unia-sc classii'icar as eniradas 
efecuadas por intermedio do teclado em 
dois tipos principals. Destes, o mais co- 
mum e a encrada dc urn nome ou niime- 
ro em que o programa solicita ao usua- 
rio que entre atgo como "nome e data 
de nascinienio" e espera uma resposta 

como "Joao da Silva, 9.7.53". 



O segundo tipo de entrada, por sua 
vez, transmite urn lipo inteirameniedi- 
verso de informacao. Nela, a pressao a 
uma tecla — em vez de provocar a en- 
irada do caractere ao qual e!a e normal- 
menle ligada — aciona uma outra fun- 
930 bem diferente, determinada pelo 
programa. Por exemplo, se a tecia X for 
pressionada. o cursor da lela sera mo- 
vido para a direita; se for Z a leda pres- 
sionada. o cursor ser^ deslocado para a 
esquerda. Diversos capitulos do curso de 
BASIC e de Programa^ao de jogos fo- 
ram destinados a ensinar a programar 
esse lipo de enirada. 

Obviamente, o primeiro tipo de en- 
trada depende do leclado de modo di- 
reio. No segundo tipo, porem, essa li- 
gafSo nSo aparece de forma (ao eviden- 
ce. £ dificii imaginar, por exemplo, que 
um usuario pouco familiarizado com o 
teclado consiga se lembrar de que pre- 
cisa pressionar o P para movimentar 
uma nave espacial para cima e, ao mes- 
mo tempo, aperiar o F para disparai 
uma arma. 



ESCOLHAO JOYSTICK CERTO 



Felizmente, existe uma alternaliva: o 

joystick, um periferico barato e acessi- 
vel para microcomputadores. Talvez in- 
justamenteassociado apenas aos jogos, 
esse periferico cumpre diversas oulras 
ftintOes. 

O joystick e uma especie de alavan- 
ca que pode ser movida em varias dire- 
?6es pelo usuario. A cada movimenta- 
cao, ele envia ao computador um sinal 
que indica a sua nova posti;:ao. A maio- 
ria dos joyslicks tern um ou mais botoes 
pLilsantes (chamados de boloes de dis- 
paro) que, ao serem pressionados, ge- 
ram sinais diferentes para o computa- 
dor Goysiick e um icrmo derivado do ae- 
romodeiismo e nao tern iraducao ade- 
quada para o portugues; a mais aproxi- 
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mada sena manche). 

Com uma programa?ao apropriada. 
mesmo qos jogos de a^ao mais modes- 
los, OS joysticks podem assumjr varias 
das fun?oes reservadas iradieionalmen- 
le para o teclado; assim, eles encontrara 
muiias aplicacoes inleres sanies, uteis so- 
bretudo para usuarios que nao querem 
ou teiii dificuidades em usar o teclado. 

Por exempio, em um programa de 
graficos. e perfeitamente possivel utili- 
2ar um joystick ou um controie seme- 
Ihante para guJar o cursor que desenha- 
ra na tela (na p^gina 164 apresentamos 
um programa que faz isso por meio do 
teclado), ou para selecionar uma cor em 
uma "paleta" exibida na tela. Um joys- 
tick iambem pode ser usado para for- 
necer respostas alfabeticas ou numeri- 
cas. Alguns jogos de fliperama, por 
exempio, possuem uma "Usla de cam- 
peoes", na qual sao exibidos os nomes 
dos jogadores e seus recordes de pomos. 
Nesie caso, uma enlrada aJfabetica curta 
(por exempio, as iniciais do jogador) i 
realizada, usando-se o joystick para mo- 
ver o cursor ate a posicao onde esla a 
leira desejada c, em seguida, o botao de 
disparo para seleciona-Ia, Com um pou- 
co de imaginagao, e facil incorporar es- 
se iruque na digitaijao de nomes e mi- 
meros maiores ou, mais comutnenle. pa- 
ra efeiuar uma escoiha emre um menu 
de opcoes de programa, por exempio. 

Em um arligo futuro, voce verS co- 
mO prOgramar O seu cOmputador para 
operar sob o controie de um joystick, dc 
modo a lornar um programa mais 
airaente ou um videogame mais diver- 
lido. Antes disso. porem, e necessdrio 
eniender quais sao os diferentes tipos de 
joysticks existentes para compuiadores, 
e como podem ser utilizados. 



TIPOS DE JOYSTICKS 



Nem todos os joysticks sao adequa- 
dos aos varios lipos de computadores 
pessoais. Antes de adquiri-los. convem 
cerlificar-se de que eles sao compativeis 
com a sua m^quina. Existe ainda uma 
ouira restricao: ao se comprar um pro- 
grama de jogos (ou outro qualquer) que 
utilize joysticks, e necess^rio verificar 
cuidadosamente se ele foi escrito para 
o tipo de joystick que voce possui. Den- 
(ro dessas limitafoes bisicas podem exis- 
[ir, contudo, diversas opgoes de compra. 

O tipo mais simples de joystick con- 
sisie em uma caixa rasa com uma ala- 
vanca. que pode ser movimenlada em 
oiio direfoes diferentes: para a esquer- 
da, para a direita, para cima, para bai- 
xo e para as quatro positjoes intermedia- 
rias. em diagonal. Al^m dtsso, ele con- 




ta com um botao dc disparo que, ape- 
sar do nome, pode ser utilizado para ta- 
refas como selecionar uma ietra ou as- 
sinalar uma op?ao. Esse genero de joys- 
tick t muito usado em videogames; por 
isso, e comumenic chamado de "tipo 
Atari" ou digital. 

Alguns desses joysticks possuem dois 
ou mais botoes dc disparo que podem 
ser liieis para jogadores canholos, por 
exempio, ou para aumentar a velocida- 
de ou o grau de conforlo na manipula- 
gao dc jogos dificcis. Esses botoes se lo- 
calizam norinalmenle na base, mas po- 
dem siiuar-se tambem na ponta da ala- 
vanca de conirole, Dependendo do pro- 
grama, nm boiao pode, por exempio, 
ser usado para disparar um canhao, en- 
quanto o outro aciona um dispositive 
que deixa cair uma bomba; um botao 
pode apagar uma linha de texto, en- 
quanio o outro a edita. e assim por dian- 
le. Alguns modelos sao especialmente 
planejados para se amoldarem a mao. 
Outros sao modelados no formato de 
um cabo de pistola, complemenlado, em 



alguns casos, com um gatilho. 

Joysticks mais modernos incluem dis- 
posiltvos exiremamente sofisticados, co- 
mo ponieiros munidos de indicadores 
ullra-sensiveis de gravidade. Esses indi- 
cadores servem para detectar pequenos 
movimentos ou inclina^oes da mao do 
usudrio (por exempio, quando esie 
aponia para alguma locacao na tela). 
Eles utilizam inierruptores de merciirio: 
sempre que a alavanca e inciinada, o 
merciirio em seu interior se desloca pa- 
ra uma das extremidades, fechando ou 
abrindo um contalo eletrico. Tais dis- 
positivos sao tao sensiveis que nao de- 
vem ser iisados em jogos, a meiios que 
o programa lenha sido escrito especial- 
mente para eles. 

Outro elemenio da lamilia dos joys- 
ticks e a "raqueie eleironica" (paddle). 
que nada mais e do que um boiao gira- 
torio, tipo poienciometro. Nestecaso, a 
posicao angular do potenciometro e de- 
teciada pe!o compuiador, que pode usai 
a informa^ao para mover um cursor na 
tela, geralmente no sentido horizontal. 
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le ou na pena iransmiiem ao compuia- 
dor as coordenadas X e Y da ponta da 
caneta. 

As caneius dplkvs sao ouiro "paren- 
te" dos joysticks, qucpermhem odese- 
nhp direto sobre a tela, a escoiha de op- 
(oes, ciu.. e esiao se tornando tada vez 
mais popiilares entre os usuarios de 
computadores doineslicos. 



Alguns tipos de joysticks resuliam dc 
uma combinatao de dois paddles, um na 
posivao horizontal e ouiro na vertical. 

Uma outra varianlc do ji^ysiick c 
a ■■trackerball" (esfcra dc comaiido). 
Originalmente descnvolvida para apli- 
cagoes militares c "avionicas", aesfera 
de comando Toi logo adaptada para 
maquinas comerciais de jogos de flipc- 
rama e estao enirando agora no mcrca- 
do dos computadores domesticos. Nes- 
se periferico. o controlc e teito por meio 
de uma bola que sc projeta aciiiia da su- 
perficie da caixa e que pode ser rolada 
em qualquer diretao, com as pontas dos 
dcdos. 

Os modelos mais sofisticados desses 
dispositivos de controle sao emprega- 
dos tambcm cm computadores de apli- 
cacao comercial e profissionai. Urn dos 
mais recentes e o chamado "catnuii- 
dotigo" (mouse), que se parece coin 
uma Crackerball de cabeija para baixo, 
embora exisiam lambem versoes que 
funcionam de acordo com outros siste- 
mas. O camundongo entra em a<;ao 



quaiido se rola o dispositive sobrc a su- 
perlicie de lima mesa. Seus movimenios 
sao deteijtados por um programa espe- 
cial, provocaiido deslocamemos corres- 
pondenics de um cursor grafico ou de 
texto na tela. Asiiim. o camundongo po- 
de substiluir as teclas de controle do cur- 
sor. E!e permite movimenios rapidos so- 
hre a tela para alierar dados ou para so- 
lucionar itens de um menu. As selefoes 
sao feitas por meio de um ou dois bo- 
toes no alio da caixa. Ao conlrario dos 
joysticks normals, o camundongo e uli- 
lizado para desenhar na tela, mas qua- 
se nunca para conlrolar movimentos em 
jogos. 

Exislem muitos outros tipos de dis- 
positivos que serveni para controlar 
o cursor na tela, mas cujo funciona- 
mento e bcm di ferentc do dos joysticks 
e de seus "parenies". Um deles e o la- 
blele grafico, que consiste em uma me- 
sa rciangular, sobre a qual se pode "cs- 
crever" com uma caneta especial, ou 
mesmo com o dedo (touchpad). Senso- 
res local izados na superficie do table- 



COMO FUNCIONAM 



Embora paregam diferentes a primei- 
ra visia, na verdade lodos esses disposi- 
tivos funcionam de maneira semelhan- 
le. Em lodos cles, o movimenio e irans- 
formado em uma serie de sinais elelri- 
cos que sao "lidos" pelo compuiador. 

Assim. como qualquer dispositive 
eletronico, os joysticks podem ser tan- 
lo digitals quanto analogicos. Normal- 
mente, uma linha de computadores acei- 
la apenas um dos tipos e mais raramen- 
le OS dois. No joystick digital existem di- 
versos comutadores eleironicos que sao 
aberlos ou fechados conforme o angu- 
io de movimentacao da alavanca: assim. 
um padrao linico de bits e gerado para 
cada posigao. Os paddles e joysticks de 
lipo analogico, por sua vez, funcionam 
de forma diferenle: eles sao construidos 
com um on dois potenciomctros (resis- 
lores variaveis), cujo angulo de rotacao 
c proporcional ao deslocamento da ala- 
vanca nos sentidos horizontal e vertical. 
As variatpocs de resistencia oblidas com 
essas rotagoes sao transmiiidas ao com- 
puiador na forma de duas voltagens 
proporcionais, de modo a fomeceruma 
linica combinagao para cada posifao de 
controle. 

Do ponlo de vista visual, os dois ti- 
pos de joystick sao lambem baslanie di- 
ferentes. No tipo analogico, os poten- 
ciometros sao montados em angulos re- 
tos e operados por um enlace mecani- 
co. A alavanca, em conseqiieneia, nao 
fica balanceada ao ceniro, ou seja, per- 
manece na posigao em que o usuario a 
deixai. Os tipos digitals, ao contrario, 
sao normalmenle balanceados ao ceniro 
e, quando liberados, voltam auiomati- 
camente para a posipao central ou neu- 
tra. No entanlo. llguns modelos analo- 
gicos sao balanceados ao centro. 

Por ouiro lado, uma nilida diferen- 
?a no comporlamenio mecanico separa 
OS dois sistemas. Os joysticks digitals 
(balanceados ao ceniro) sao mais duros 
e normaimente so se movimeniam por 
uma pequena dislancia. Assim, um es- 
forgo maior feito pelo jogador e conlra- 
balanpado por uma maior resistencia 
mecanica. 

Na verdade, o efeito que am bos os ti- 
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pos provocam no computador e contro- 
lado mais pelo programa do que pelo 
proprio joystick. Geralmenie. urn pro- 
grama bem escrito lorna o joystick mais 
sensivei e facil de controlar. For exem- 
plo, urn programa pode determinar que 
um leve movimento da alavanca seja su- 
ficiente para dar inicio a mudancas de 
dire?ao de um objeto na tela, sem que 
haja necessidade de se pressioiiar conti- 
nuamente a alavanca. 

Ja OS labletes digilalizadores que fun- 
cionam por toque {louchpads) consistem 
em um sanduiche de duas folhas de plas- 
tico, separadas por uma pequena dis- 
tancia. Uma I'ina grade de resistores 
ou fios condutores e constriiida sobre 
uma das faces dessas folhas, orientadas 
de modo a formar angulos retos enlre 
si. Ao menor contaio de um dedo ou de 
um lapis com o lablete, os condutores 
siluados nas duas folhas se tocam e ge- 
rara um padrao de vollagens. que e var- 
rida pelo computador. 0.s touchpads. 
eniretanio, podem apreseiiiar proble- 
mas, devido a dificuldade de se conse- 
guir uma superficie uniformemcntc sen- 
sivei. Uma desvantagem em utiliza-los 
e que, se a superficie se sujar — por 
marcas de dedos, por exempio — , os 
raovimentos lenderao a se tornar erra- 
licos devido ao deslizamenio do dedo 
pela superficie. 

Ewrcmamenie leves, as trackerballs 
podem ser operadas com facilidade, pois 
a bola nao tern conexao mecanica dire- 
ta com o sistema sensor. Ela e sustenta- 
da sobre rolamentos que giram livre- 
mente em duas dire?oe5. em angulo re- 
10 uma em relacao ci outra. Quando a 
bola sofre uma rotaigao, ela faz rodar 
um ou ambos os rolamentos. Estes, por 
sua vez, esiao conectados a polenciome- 
tros ou a um sensor digital — um siste- 
ma formado por um disco rotatbrio pa- 
ra inierromper um raio de luz prove- 
niente de um diodo LED (foto-emissor), 
que cai sobre um fototransistor (foto- 
sensor). Com a contagem de impulsos 
de interrupcao, o computador fica "sa- 
bendo" de quanto girou o rolamento. 
Mais uma vez, qualquer que seja o sis- 
Eema utilizado, o computador e capaz 
de inlerpretar os sinais elctricos em ler- 
mos de um padrao determinado de mo- 
vimen[ai;ao na tela. 



OPERACAO COM COMPUTADOR 



Os coraandos GETS ou INKEVS do 
BASIC sao OS mais utilizados para pro- 
gramar a e.tecucao de funcoes de mOvi- 
menta^ao do cursor de video, sob con- 
srole de delerminadas teclas do ceclado. 
Mes efetuani uma "varredura" do te- 



ciado, de modo a assinalar ao progra- 
ma se alguma tccla foi pressionada. Se 
isso acontecer, o programa poderS efe- 
Luar alguma operagao cspecifica — taJ 
como a movimentagao de uma base de 
tnisseis para a direita. se a tecia X, por 
esemplo. for pressionada. 

A operacao do joystick digital nao di- 
fere essencialmente disso. Mas enquan- 
to o teclado e parte integranle do com- 
putador, joystick e um elemento ex- 
lerno acoplado a ele. Assim, o joystick 
deve primeiro ser conectado ao compu- 
tador atraves de uma porta adequada 
(um conector especial); e por essa porta 
que o micro normalmente se comunica 
com mundo exterior. Em seguida, e 
necessirio colocar na memoria RAM do 
micro um programa adequado para 
"varrer" periodkamente a porta decn- 
trada, de modo a procurar por um si- 
naE especifico, que signifique que o joys- 
tick esia sendo movimentado. 

Alguns problemas de compatibilida- 
de podem surgir ertre esses perifericos 
e o computador. Em primeiro lugar, o 
joystick precisa ser coneciavel a porta 
de enirada do micro, seja diretamente. 
seja airaves de algum (ipo de interface, 
Alem disso e necessario que o progra- 
mador conheca os sinai* gerados pelo 
joystick; caso conlrario. nao sera pos- 
sivel progiamar o computador para pro- 
cura-los. 

Essas exigencias dao lugar, as vezes. 
a treracndas confusoes. Felizmente, ja 
existem padroes de mercado seguidos 
cm maior ou menOr grau por diferentes 
f'abricantes. No Brasil, cada linha dc mi- 
crocompuiadores apresenia um conjun- 
to bem definido de convencoes. O pa- 
drao mais comum, que se tornou vir- 
tualmente universal, e o do joystick ti- 
po Atari (digital e centro-balanceadn). 
Exislem diversos fabricantes de joysticks 
desse tipo. e alguns compuiadores sao 
projetados de modo a aceila-los direta- 
mente. 

E o caso, por exempio. da linha Sin- 
clair (ZX-81 e Spectrum), cujos com- 
pativeis nacionais {TK-85,.TK-90X, etc.) 
incluem um conector para joysticks ti- 
po Atari. Os modelos da linha MSX 
tern, por sua vez, enirada para dois joys- 
licks tipo Atari. Os compativeis com o 
TRS-Color (por exempio. o Proltbgica 
CP-400) uiilizam joysticks analogicos. 
Ja OS micros da linha TRS-80 normal- 
mente nao contam com nenhum tipo de 
entrada para joystick. 

Alem disso, podem exisiir. as vezes, 
diferencas importantes enlre diversos 
modelos de miquinas da mesma linha, 
como no caso do Apple, que tern pro- 
totipos nacionais que aceilam joysticks 
digitals tipo Atari (c o caso do TK-2000), 



ou analogicos (paddies). 

Uma das dtfercnijas mais importan- 
tes enlre micros diz respeilo ao interfa- 
ccamenio. 



INTER FACEAMENTO 



Como qualquer periferico de compu- 
tador, OS joysticks precisam ser conec- 
tados S UCP por intermedio de uma in- 
terface adequada. A interface pode es- 
lar integrada a configuracao basica da 
UCP do computador, ou pode ser um 
dispositivo separado. 

Muitos fabricantes incorporam aos 
seus micros um conector e uma interfa- 
ce do tipo Atari, de modo a faze-los 
aceiiar qualquer joystick que seja de 
um modelo compaii'vel com esse padrao. 

Outra saida seria dispor de uma^u 
mais portas analogicas, que aceitam 
paddles ou joysticks do tipo poiencio- 
metro. No ertanto, sao raros os micros 
que ja incluem essas portas em sua con- 
figura^ao bisica, pois isio significa que 
devem ser construidos dois convcrsores 
analogico-digitais para cada joystick a 
ser utilizado. 



Os micros da linha Sinclair Spectrum 
nao vem acompanhados de joysticks. 
Assim, para ajustar a eles um desses pe- 
rifericos, e necessario uma interface 
apropriada ao conector de borda exis- 
tenie atras do console. 

A interface e alojada em uma caixa 
separada que se situa na parte posterior 
da maquina, em contato direto com os 
terminals do conector de borda, na en- 
trada do usuario. Existe. porem. um ti- 
po de interface (disponivel apenas no 
ExEerlor) conslruida dentro da caixa do 
proprio joystick, com um conector se- 
parado para o cabo de ligacao. 

O joystick mais adequado para o 
Spectrum e compativel com o tipo Atari. 
No Exterior, eniretanio, exisicm muitos 
outros tipos de joysticks, que sao incom- 
palivels entre si no que se refere aos si- 
nais que geram no conector de expansao. 

Por isso, usuario do Spectrum de- 
ve tomar muito cuidado quando com- 
prar ou copiar programas provenienies 
do Exterior que utillzem joysticks, pois 
eles nem sempre funcionam com o joys- 
tick disponivel no Brasil. Assim, e con- 
veniente verificar a documentacao do 
software antes de adqulri-lo. Alguns 
programas mais sofisticados incluem um 
menu de opcoes que permltem ao usua- 
rio selecionar o lipo de joystick a ser 
usado para acionar o jogo. 

Outro problcma para os proprietarios 



do Spectrum e que as interfaces mais co- 
inuiis desse micro so possibiliiam a co- 
nexao de am joystick. Eniretanto, algu- 
mas inierfaces mais sofiiticadas permi- 
tem a conexao de dois joysticks ao mes- 
mo tempo. Infelizmcnte, porem. sao ra- 
ms OS softwares compali'veis com lais in- 
terfaces. 

O inierpretador BASIC do Spectrum 
nao tem nenhum comando especifico 
para programacao com joysticks. As- 
sim, o mais comum e usar o comando 
INKEYS. 



O ZX-81 esta longe de ser uma ma- 
quina ideal para jogos, Entretanto, as- 
sim como o Spectrum, 6 possivel conec- 
l3-lo a urn joystick do tipo Atari por in- 
termedio de um conecior Phillips, situa- 
do na lateral oti na traseira do console. 
Portanio, a operacao com esse micro e 
parecida com as descritas acima. 

O BASIC do ZX-8 1 nao tern nenhum 
comando especifico para a programagao 
de joysticks. comO e o caso dos micros 
da linha MSX. Apple e TRS-Color. mas 
o comando INKEVS pode ser usado da 
mesrtia forma que com o leclado. pois 
OS joysticks para o Z\-81 geram sinais 
coriespondentes as leclas dc controle de 
cursor C6, 7. 8 e 9, combinadas com 
<SHIFT>). 

Isio e uma vaniageni adicional, pois 
um jogo que uiilize lais icdas operara 
igualmenie bcm, com ou ^em joysiick 
(so que ficara mais diveriido com o joys- 
lick, como CO casodeum popular pro- 
grama de simulatao dc voo de uma ae- 
ronave). 

D 

Os. microcomputadores da linha 
TRS-Color incluem duas eniradas para 
joysticks anal6gicos, do tipo potencio- 
metro de ceriro nao-balanceado. Esses 
joysticks lem boloes de disparo, e po- 
dem ser facilmente programados por co- 
mandos especificos do inierpretador 
BASIC. A tela de alia resolutao grafi- 
ca, quando associada por programa^ao 
ao uso desses joysticks, permite efeitos 
sensacionais de animagao grafica, em 
jogos ou no desenho livre. 



Q 



Os micros da linha TRS-80 nao in- 
cluem renhuma previsao ou porta espe- 
cial para joysticks. 

Eniretanio, esses computadores po- 
dem ser conectados tanto a joysticks di- 
gitais do tipo Atari, quanto a joysticks 
e paddles anal^gicos; para isso, existem 



prod ut OS coroercialmente disporiveis no 
mercado. 

No primeiro caso, e necessario efe- 
(uar uma modificai^ao no hardware, 
conectando fios em paralelo com a in- 
lerface do teclado, Em seguida, deve-se 
ligar a maquina ao joysiick. Uma vez 
em opcratao, este gcra sinais semelhan- 
ifs aos provocados pela pressao das le- 
clas de conirole do cursor, que podem 
ser deieciadas por meio do comando 
INKEVS. do BASIC. Ha um dispo-siti- 
vo fabricado no Brasil — "joypad", um 
pequeno leclado paralclo apenas com as 
leclas de controle de cursor {Juypad) — 
cuja fu[ii;ao consiste em facilltar o de- 
senipenho cm jogos. 

Para conectar dispositivos anal6gi- 
cos, e necessario adquirir uma inlerfa- 
ce especial de coiiversao analogico-dlgi- 
lal, que e ligada a porta de expansao. 
na parte de Iras da UCP. 

No TRS-80 nao existem comandos 
especificos do BASIC para os dois tipos 
de joysticks. 



m 



Os microcomputadores da linha 
MSX incluem portas de entrada para 
joysticks do tipo digital cenlro-balancea- 
do, com dois ou mais boloes de dispa- 
ro. No Brasil, cada fabricante oferece 
o seu modelo proptio de joystick, mas 
o padrao de conexao e gerat^ao de sinais 
segue o do Aiari. 

Da mesma forma que o TRS-Color, 
o inierpretador BASIC dcssas maqulnas 
contem comandos bastanle poderosos. 

a] 

A maioria dos micros da linha Ap- 
ple apreseria no console duas portas pa- 
ra dois paddles analogicos, ou para um 
joystick de dois eixos (nao ceniro-balan- 
ceado)- interprelador BASIC incor- 
pora comandos para leiiura da posicao 
dos potenciomelros e da pressao aO bo- 
lao de disparo. 

Existem ainda no mercado joyslJcks 
do lipo digital, que podem ser conecta- 
dos via porta serial ou paralela. 
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O Microdigital TK-2000 inclui. na 
versao padrao, um conector especifico 
para joystick digital do lipo Atari, que 
opera paralclamente ao leclado normal 
(ou seja, gera sinais correspondentes as 
leclas de coniiole do cursor e as tecias 
FIRE dos dois ladosdo leclado). Assim, 
a utilizagao do joystick pode ser progra- 
mada por meio de comandos GETS ou 
PEEK do leclado existentes no BASIC 




Como funciona um conversor ana- 
l6gico-digital7 

Necessario para converter em nii- 
meros binflrios as voltagens continuas 
geradas pelos paddles e joysticks ana- 
logicos, o conversor A/D realiza uma 
laref a de digitalizagao do sinal el^tnco 
de entrada. 

Suponhamos que uma roiacao de 
1 1 B graus num dos potenciometros do 
loyslick gera uma voliagem ptoporcio- 
nal entre e 5 volts. conversor A/D 
tern um comparador jnterno que gefa 
voitagens sucessivas, divididas em um 
certo numero de intervalos (por exem- 
plo, 256 intervalos de 0.0195 volts ca- 
da, se for um conversor de oito bitsi, 
A cada nivel inlerno de voltageii, o cir- 
cuilo compare o com o nivel exierno de 
voltagem (gerado pelo joystick) e de- 
cide se esses valores sao aproximada- 
mente iguais ou nao. Ao mesmo tem- 
po, outro circuilo digital vai contando 
quantos desses niveis foram testados. 
Assim que o tomparador infotmar que 
a igualdade foi atingida, o conversor 
A/D envtarS ao computador, airav6s da 
interface paralela, o byte contendo o 
numero de contagens. Por exemplo. se 
a uoliagein gerada pelo joystick for 
1.95 volts, o numero enviado para o 
computador serd 100! 



do TK-2000. Nao existem joysticks ou 
paddles do tipo analogico para esse 
computador. 



CUIDADO AO COMPftAR DM JOYSTICK! 



Ao comprar um joystick, verifique 
primeiro se o modelo escolhido e com- 
pativel com o seu computador e, no ca- 
so do Spectrum, com o seu software 
tambem. 

Em seguida, pense em quanto voce 
esta disposto a gastar; se voce e proprie- 
tario de um Speclrum, lenha em men- 
te que a inierface podera custar tamo 
quanlo o joystick, ou ale mais, Os tipos 
mais simples de joysticks custam o mes- 
mo que um programa de jogo, enquan- 
10 OS mais elaborados podem ser duas 
ou Ires vezes mais dispendiosos. 
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PROGRAMAaO BASIC 2/ 



ORDENACAO PELO 
'IPODO OE BOLHA 



m 





Uma vez elaborado o projeio gerai de 

lira programa e escritos os raodulos in- 
divicluais, pocle-se comefar a pensar em 
Lestar os moduios. Em seguicia, i neces- 
sirio planejar a rorma de colocS-los lo- 
dos juntos . 

As sub-rotinas ou modulos precisam 
ser colocados dc aJguma forma dentro 
do conlexlo do programa. Normalineii- 
te, a lij^a^cio i feiia por nieio de varia- 
vejs. Algumas deslas — conhecidas co- 
mo pardmelros de enirada — sao espe- 
(jificades no infcio, e pa&^adas k roiina, 
Ouiras varidveis retornam ao programa 
por intcrmedio da roiina: eslas s5o os 
• , '.,■■ ' i'!ros de saida. Emiiiio impunan- 
I'. '1';. as variavcis sejarn cspetificadas 
de um mode preciso para nao serein 
confundidas unias com as ouiras, 

Ao se comc^ar a escrever um progra- 
ma deve-se fazer uma lista de todas as 
iriaveis necessarias, juntamenLe torn 



uma descriijao dos seus uses c possiveis 

valores iniciais, caso scjam conhccidos. 
Do conlrario, mesmo (jue se saiba no 
inicio o que significain lodas as letras. 
corre-se o risco de csquecer de reiornac 
ao programa mais tarde. Um recurso 
basianie pr^iico, caso o comi^utador 
permita ou o espago de iiiemoria nao se- 
ja muito pequeno. coitsisie cm adoiar 
nomes iongos para as variaveis <veja na 
pagina 99 uma tabela do que t permili- 
do para cada linha de microcotnpu- 
tadores). 



ROTINA DE ORDEMACAO TlPO BOLHA 



Como se deve especificar as variaveis 
para uma rotina de ordena^ao tipo bo- 
Iha? O exempio a seguir apresenta uma 

por^ao especlfica de mairiz ordcnada al- 
rabelicajncnic. 



Variaveis de entrada: 

A$<N) — .coiijunto unidimensional a 

ser class! ficado (tamanho dc N > - J) 

NI — primeiro ilcoi cm coiijunio a ser 

classi Hcado ( 1 < = N 1 < = N 2) 

l\2 — ultimo item em conjunto a ser 

classificado (Nl< = N2< = o tamanho 

de A) 

Varidveis de safda: 

A$(N> — conjunto ordenado. 

Varidveis tempordrias; 
Z. ZS, I. 

Uma provtdencia muito litil para evi- 
tar conflitos eiitrc modulos ou com o 
rcsCo do programa consisle em listar as 
varidveis temporarias utiiizadas em uma 
siib-roiina. Tanibem e util reservar al- 
gumas ictras, especialmeiile para varia- 
veis temporarias: por cxemplo, as varia- 
veis de ZO a '£9. Esse lipo do recurso evi- 
la desperdicios de espai;o das variiveis. 

Alguns erros ou defeiios de progra- 
ma sao causados as vezes por variaveis 
vidadas — isio e, com valores mudadoK. 
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Aperfeicoe as tecnicas da programacao 
estruturada, aprendendo a 
construir urn programa de ordenacao 
pelo metodo de bolhas, e 
coloque em otdem o que quiser, 



DEFNAASVARIAVEIS 



COMO ESCREVER UMA 



SUB-ROTINA DE ORDENACAO 



COMO TESTAR OS MODULOS 



COLOQUE TUDO JUNTO 
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'5si:s problcmas, L.'iiniiidii, podciii str 
cviiadtis aim a aplicavao do metodo ex- 
posio acima. 

Uma listagcm de varidveis tanibtm c 
III il para o caso de o programa vir a ser 
moJificadti maiK lardc, Ess.a iiiedida as- 
segura iiiaior rapidez iia alierai;ao das 
variavcis. impedindo ao mesnio tempo 
o aparecimemo de erros extras no pro- 
grama. Tais erros sao nomialniL-nie pro- 
vocados por variaveis vk-iadas, uliJiza- 
das para oulrOs prop6.sitos. Lenibre-se 
Eiinda de anoOr as modificagoes, jimla- 
iticrile torn as datas em que toram t'eitas. 

Eis aqui o programa para iinia roii- 
na de ordcnagao por bolhas (scu funcio- 
namento ser^ expiicado mais adianic, na 
lipao niimero 23 de ProgramaiSa 
BASIC). 

1000 BEH OHDENA^fiO TIPO BOLHA ( 

AStN) ,K1.N2) 

1010 LET Z-0 

1020 FOB I-Nl TO N2-1 

1030 IF AS(I)<-ASCI+1) THEN GOT 

1080 

1040 LET ZS-AS(I) 

lOSO LET AS(l)-ASCI+n 

1060 LET AS(I+1)-ZS 

1070 LET Z-I 

1080 NEXT I 

1090 IF 2-1 THEN GOTO 1010 

1100 RETURN 



Conio luda Mih-roiiiia, esia dwe ^er 
chamada a parlir do piograriia princi- 
pal. Por L-xcmpto, para ordeiiar os iiciis 
dc 5 a 20, a iDtiiia pode ser diamada 
assim: 

100 LET N1=5;LET N2'20:aOSUB 
1000; REM OROENACAO TIPO BOLHA 

Il prcciio lambem que cxista unia sc- 
^ao do programa ()uc Ihc pcrmiia cntrar 
OS iiensa serem ordenados. couiraque 
imprima a lisia ordenada. Nesic eslagto 
vooe deve decidir como quer que a esi- 
bi?ao aparcga na tela. 

Se voce trabaiha com um MSX. po- 
dc lirar provcilo do podcroso BASIC 
de4se micro, Made a linha 1040 para 
SWAP A$(I).A${I + t> e elimirie as li- 
nhas 1050 e 1060. Scu fompulador tro- 
card conteiido das duas variiveis de 
uina s6 vw, dispcnsando o uso da va- 
riivel '/.%. 



COMO TESTAR OS MODULOS 



Cada modulo do projelo original po- 
de so loriiar unia ^ub-roiina no scu pro- 
grama. F.sse niiJliKJo de dividit o progra- 
ma e niuilD liiil duranle o csiagio de ics- 
te. pois OS mOdulos podem ser posios a 
prova ou depiirados individualraentc. 
Volte agora 'a siib-rotina da ordenacao 
[jpo bollia. testando-a assim: 



h'!li 
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8 INPUT "NUnero de Itena 

10 DIM AS(N) 

12 PRlNfEntrada doa (tens da n' 

atr 12; ' 

U FOa 1-1 TO N: INPUT A5(I3:NE 

XT I 

16 INPUT 'Interval© a 3er orden 

ado ";N1,N2 

le OOSUB 1000 

20 PHlNT"LiBta ordenada:' 

22 FOR 1-1 TO NrPRINT ASCDrNEX 

T 1 

24 GOTO 16 



OD 



O programa acima tambem funciu- 
nard no TRS-Color e TRS-80. desde que 
se adicione a liiiha u seguir. cujo objelj- 
vo 6 rescrvar um espa^o suficienie de 
raemoria: 
6 CLEAB 1000 



No ZX-81 f no Spectrum, modifiqiie 
a linha 10 do progrdnia acima para: 

10 DIM AS(N, 10) 

No ZX-81 , fracionc at. liuhas com de- 
clarac^es miiltipJas, mude tudo panr 
maiusculas, c allcre a Itntia 8 paia; 
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e PRINT -NUMEHO DE ITENB" 
9 INPUT N 

Enii-eianio, a tarefa dc icsiar catia ta- 

so de enlrada c dc saida pude se revclar 
impossive! cm programas oomplexos, 
I'xigindo urn tempo excessivamenrt' 
yrande, Apcsar disso. os casos limiiro- 
ics podem ser checado^. Por excniplo, 
a roiinaseguiniepodescr vcrificada pa- 
ra emrar salorcs dc 1,99 e 100. 
1010 PRINT -ENTRE UM NUMERO 

(1-99) ■; 
lOlS INPUT M 
lOaO IF NCI OH H>99 THEN GOTO 

1011} 
10 JO RETURN 

Ouira providciicia aconselhavcl l> 
ccnilicar-se dc tjue cada Irnlia do pro- 
grama foi rodada pelo nienos unia vez 
durante o esiagio de dcpura<;ao. Assim, 
todo* OS desvios conditionals, tal como 
a declaracao IF, poderao ser cliocadns 
com ambas as condicdes de verdadciro 
ou falso. 



COLOQUE TUDO JUNTO 



Finalmenie. todos os modulos podc- 

r.To -er cncadeados e o programs (csla- 
Jo intiio iini lodo. l«o 6 conhccido co- 
mo ifUPgrafao (in pni^ratna. Sc ocorre- 
ram problernas. qualquef modulo suk- 
peitn podcra ser cbccado novamcmc e 
modiricado cm caso de necessidade. 
Cumpridas lodas essas cxigcncias. 



vocJ tend um prograina pcrfeitamente 
esimruradci que fari exalamentc o que 

for dL-ierniinado. 

As regias paraseescrcver um progra- 
ms estrmurado sao, rcsumldamente, as 
segiiimcs: 

1. Escreva uraa descrii;ao gcral do 

prograina. 

2. t)ivida-a em lantos mridulos quantos 
foreni os niveis necessArios, 

3. Dcsenhe um I'kixograma para cada 
modulo e defina as variaveis de en- 
lrada e de saida e de guaisquer ou- 
iros efcilos, lai*j como aeiKibigao na 
Ida. 

4. Escreva os programas para cada m6- 
diiloc|ue iitili/ar as cstrutUTas descri- 
la^ na parte I. 

5. Teste os m6diilos. fornecendo as en- 
tradas e chccamio os re^iuliados c as 
ftaidai. 

6. Combine lodos os modulos e tesie o 
coiijunio do proBrama. 

A tlriiilidadc de lodo esse irabalho t 
aumcniar a legibilidade de um progra- 
ma. assim como sua capacidade. scgu- 
ranv;ic iransportabilidade, Alem disso, 
ek- facilita a tarefa de testar e modifi- 
car o programa. 



COMO FUNCIONA M^ODO DAS 80LHAS 



O programa de ordcna^ao pelo mt- 
lodo das bolhas foi utili/ado aqui para 



mostrar como um modulo pode ser 

conslruidoe depois test ado, antes deser 
encadeado ao programa principal. As 
rotinas de ordenatao sao muifo uicis pa- 
ra todos OS tipos de programas. A que 
aprcscniamos agora dassifica paiavras 
cm ordem alfat>euca, mas podcria ser- 
vir tambem para classificar niimeros em 
ordem crescente. Basia modificar as va- 
riaveisZ$paraZ,eoconjuntoA$( )pa- 
ra A( ). 

O compuiador percorrc a lista. com- 
parando pares de iiens. um dc cada vez. 
Se eles estivereni em ordem correia nao 
serao mudados. Se estivcrem em ordem 
incorreta serao imercambiados. O pro- 
grama confinua alraves da lista, cfe- 
(uando mais Irocas ale que todos 05 
iiens esicjam em ordem correia. 

Para avaliar o funcionamcnio do 
programa em detalhcs e convenientc 
compard-lo com o riuxograma. A pri- 
meira parte do programa (que nSo esi4 
no diagrama) define o mimero de iiens 
da lista — N — e estabelece um conjun- 
lochamado A$( )con)espai;osijl'icLenic 
para [M iiens. As linhas 12 e 14 pcdcm 
ao usudrio as paiavras que serao arma- 
zenadas no conjunlo e a linha 16 per- 
gunla quais delas serao ordenadas, Se 
voce quiser ordenar a lisia inieira. digi- 
te I scguido de uma virguia. maiso va- 
lor de N . A sub-roiina e chamada na li- 
nha 18. 

A rolina comc^a estabelecendo Z 
igual a 0. Z 6 conhecido como um sina- 



zador e registra sc algiima iroca de po- 

; sif dcs foi rcahzada. 

A linha 1020 cria uni lac^o para per- 

f^corrct a lista. Os niimeros ceniricam de 

^quecada par foi camparado pelo menos 
uma vcz. A linha 1030 compara as pri- 
meiras diias palavras; sc esias esiiverem 

. cm ordem correia, o programa piilari 
a rotina de trocas c se dirigira para o par 
scguinte. 

Aslinhas 1040 a 1070 somcnie serSo 

! aiingidas sc as palavras es.tiverem em or- 
dem incorreia. A primdra palavra c co- 
locatla cm iiina vurii^vcl icmporaria Z$. 
A segunda •t niovimentada para algunia 

, posiv'ao. <-' eiiiao a primcira palavra e 
dcslocada uma posi^ao abaixo, dcniro 
doconjiinio, Zceniaoigualadoa i pa- 
ra mo^iirar que foi efeiuada uma troca. 
A linlta 1080 manda o coitipulador de 
voita para comparar o par dt: palavras 
seguinie. 

Uma vez que lodos os pares lenham 

;sido comparados. o programa aihigiri 

'alinlia lO^tU. Sc Z= I. isso signifies que 
pelo menos uma ircca foi el'eiiiada; dcs- 
->a forma, clc pt'rcorrera a iisia rovu- 
mciiie. Sc nciihimia troca I'oi ttcluada. 
cntao a lisia csta iia oidcm correta. a 
sub-roiina icmiinaeas [iiilias20e22 im- 
primirao a lista ordenada. 

A deiiomiiiacao de meiodo das bo- 
Ihas teni. as^im, sua razati dc sen o mo- 
vimenlo das palavras Icmbra globes dc 
ar cm ascensao no inlerior de um 

I Uquldo. 




A iinlrnupHi t>^l" nivitido itc hiilhns pnnttca 
um vt'i'ilii siTiu'lliiiiilc BO A:\ nt'iut iFr 
liollius lie ;ir lui liilcrior ilr um tiiftiidti. 
iriicuiido palavn^ i- niimcrnv nu 
(inl<-in liicwrrcla c deshwnnKld-ns para eima- 



Illlllllll 



DIGO DEMAQUIf^^^l 
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Bern mais rapido do que o programa para 

Spectrum, o Assembler para os 

micros da linha TRS-Color proporciona 

igual eficiencia. Economize 

tempo, aprendendo a trabalhar com ele. 
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Nesta litao, apresentamos um As- 
sembler para o TRS-Color. Mais longo 
do qut o programa para o Sinclair ZX 
Spectrum objeto da lii;ao anterior, ele 
conla com a participacao de um editor. 

O niicroproces&ador utilizado pelo 
TRS-Color e o Motorola 6809 de oito 
bits, cujo conjunto de iiistrui;6es 6 bem 
menor que o do Z80, empregado pelo 
Spectrum. Entretanto, o Assembler do 
TRS-Color (em que passar por ate tres 
"etapas" para traduzir um comando de 
dezesseis bits, enquanio o programa do 
Spectrum deve passar por no maximo 
duas. Apesar dessa etapa adicional. o 
programa do TRS-Color e quase ires ve- 
zes mais rapido que o do Spectrum; bcu 
grande recurso para procurar os mne- 
monicos — a funi^ao INSTR — iiao 
existe no BASIC do Spectrum. 



A linha 10 pode provocar um erro FC 
quando o programa e rodado pela pri- 
meira vez. Nao se importe com a men- 
sagem de erro e rode o programa nova- 
meoie, que ele funcionara. 



ASSEMBLER 



10 PMODE 0:PCLEAB 1:CLEAR 3000: 
CLSiPHINT #233, "INICIALIZANDO": 
RS-CttRS(13) :P0KE 146,1 
20 DIM SKS(l) ,K1(94) ,K2(94) ,T$( 
200) .HR(IOO) ,Z$(100) 
3D FOB CC=1 TO 94:HEAD K$,K1(CC 
) .K2[CC) :C-CC/'19:SKS(C)-SKS(C) + 
RIGHTS ISTRS (CO . 2) +K3 :NEXT 
40 DATA ADCA. 185,1, ADDA. 187.1. A 
ODD. 243, 2,ASL, 120, 3 , CLB . 127,3,C 
MPA . 1 7 7 , 1 . CMPD ,4275.2, CMP Y , 4 284 
, 2,BCC,36.4,BCS.37,4,BEQ, 39,4 
50 RATA BHS.36.4.BL0.37.4,BMI,4 
3.4.BNE.3e.4,BPL.42,4,BRA.32,4, 
LBRA, 22.5,BSR. 141 , 4 , LBSR , 23 , 5 , C 
MPX.ie8,2,CMPU.4531,2,CMPS,4540 
.2,DEC.122,3 

■60 DATA iNC,124,3,JSB,189.3.LDA 
.182. l.LDB.246,l,LDD.252.2,LDS. 
4350,3,LDU.254,3,I.DX.190.3,LDY, 
4286,3,LSL,X20,3,LSR.116.3 
70 DATA PSHS,52 ,1 , PSHU,54,1 , PUL 
S,53.1,PULU.55,1,BOL,121.3,ROR, 
11B.3,HTS.57. .STA. 183, 3, STB, 24 7 
.3,STD.253.3.STS.4351.3,STU,Z55 
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ara 

OS 
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CONVERSAO AUTOMATICA DA 
LINGUAGEM ASSEMBLY PARA 

CODIGQ DE MAQUINA 

COMO CALCULAR SALTOS E 



DESVIOS 



MANIPULACAO DE POS-BYTES 
USO DE ROTULOS 



COMO CQLQCAR CQPIGO DE 

MAQUINA NA MEMORI A 

AUMENTA A VELOCIDADE 




.3 

80 DATA STX. 191. 3. STY, 4287,3,511 
EA.176,1.SUBD,179.1.ANCA. J-B0,1, 
ABX,5fl, ■ ANDCC. 76.1 ,ASR, 119. 3 ,RT 
1,59. .SBCA,17B,1,N0P.18. , NEC, 11 
2, 3 

90 DATA BITA, 181. 1 ,BGE, 44, 4,807 
.46,4.BHI,34,4.BLE,47,4,BLS.35. 
4,BLT.45,4.BBN.33.4.BVC,40,4,BV 
S.41,4,EXG,3lJ,l,TFa.31.1 
100 DATA COM.115,3.CWAI.108. l.D 
AA.25, ,EORA, 184. 1,TST, 125.3, LEA 
S,66.3.LEAU,67,3.LEAX.64.3,LEAY 
.65.3,MUL.61. ,ORA, 138,1, ORB, 202 
.1 

110 DATA OHCC.74.1.SEX.29, ,SUI, 
63, .SWI2,4159, ,SWI3,4415. .SYNC. 
19, , EQU.-l,2.FCB,-2, 1 , FOB, -3 , 2, 
HMB, -4. , JMP. 126, 3 
120 DIM XSC13) .V(14) .KK(13) ,YS( 
13) 

130 FOB C-0 TO 12: HEAD XS(C),U{ 
C) ,KK(C> .Y3{C) :NEXT 
140 DATA PCB,253,7, ,PC.253,B,D. 
—. 243,1.x. -.242,1. Y.X, 159, .U,Y 
,191 . ,S.U,223, ,PC 

150 DATA S,255. . .++.241. 1, ,+,24 
0,1,A,A.246.1.B,B. 245,1,CC,[J,25 
1.1. DP 

160 FOR J-0 TO 9:READ PU$(J),PU 
(J) :NEXT 

170 DATA PC.128.U,.64.S,64,Y, 32, 
X,16,DP,B,D,6.B.4.A.2.CC,1 
180 CL5:PR1NT 64 3 ,. "ASSEMBLER'RS 
RSTAB(8)'G-LER DO GRAUADOR"HSSS 
TAB(8)"S-SALVAR NO GBAVADOR'HSR 
STAB(8)"A=M0NTAR' 
190 PRINT e296,'E=EDITAfl LINHA" 
RSR3TAB(8) "D=APAGAR LINHA-RSRST 
A6(8)"L=LISTAR NA TELA" 
200 AS-INKEYS:IF AS="" THEN 200 
210 JJ-INSTBCGSEDLA-.AS) 
220 IF JJ-0 THEN PRINT ■<"AS'>I 
NUALID0";FOH J-1 TO 1000;NEXT:G 
OTO 190 

230 CLSiON JJ GOSUB 1420.1450,1 
490,1710.1760.280 
240 PRINT eO,"PBESaiONE <ENTER> 
PARA CONTINUABQUALQUEH OUTRA T 
ECLA PARA MENU PRINCIPAL" 
250 AS'INKEYS:IF AS="" THEN 250 
260 IF A30BS THEN 180 
270 ON JJ GOSUB 1420.1450.1700. 
1710. 1850. 290:GOTO 240 
280 K-0xK9-0:P0-0 
290 PS-0 

300 PS-PS+1:IF PS<4 THEN K=KO : P 
-PO^PRINT ei.-INICIO DA ETAPA"P 
S:GOTO 330 
310 PO=P:HETURN 

320 IF PS=3 THEN PBINT " EHHO D 
E POSBYTE" 



330 GOSUB 1320 

340 GOSUB 1260 :OPS-CS: IF LEFTS ( 

0PS.1)="''" AND PS-3 THEN PRINT 

OPS 

350 IF LEFTS{0PS,1)-"*" THEN 33 



360 IF OPS="END' AND PS=3 THEN 

PRINT:PRINT" FIM-ULTIMO ENDE 

HECO" ;P-1 

370 IF OPS'-END" THEN 300 

380 IF OPSO-ORG- THEN 420 

390 GOSUB1260;S=0:IF LEFTSfCS.l 

)="*" THEN S=P:CS=MID3(CS,2) 

400 P-VAL (CS)+S:IF PS=3 THEN PR 

INT: PRINT" ORG" ; P 

410 GOTO 330 

420 IF P-0 AND PS'3 THEN PRINT" 

FALTA ORG" :P=35000 
430 CC=0:DF=0 

440 C=-INSTR{SKS ICC) ,OPS) : IF CO 
THEN GOSUB 530 :G0TO 570 
450 C-INSTR(SK$(CC) ,LEFTS (0PS,3 
)):IF COO AND HICHTSIOPS . 1) <"C 
- AND MIDS(SKS(CC) .C+3,1)<"A- T 
HEN GOSUB 530:GOTO 540 
460 IF COO AND RIGHTS (OPS. 1) '" 
B" GOSUB 530:GOTO 560 
470 C-INSTB(SKS!CC) .BIGHTS{OPS. 
3)):IF COO AND LEFTS [OPS . 1) = "L 
" GOSUB 530:GOTO 550 
480 CC=CC+1:IF CC<2 THEN 440 
490 IF PS-3 THEN PRINT OPS 
500 GOSUB 1350:()3-Q2:BH(Q2)-P:I 
F CS""" THEN 340 
510 IF PS=3 THEN PRINT " LINHA 
NAO RECONHECIDA' 
520 GOTO 330 

530 C=VAL{M1DSCSKS{CC) .C-2,2)) : 
RETURN 

540 OP^Kl (C)-32+16«(RIGHTS(OPS. 
1)-"A") :K2=0:GOT0 560 
550 0P=K1 (C)+4096;K2=5[GOTO 580 
560 OP=K1(C)+64:K2=1:GOTO 5B0 
570 OP-Kl (C) :K2-K2(C) 
580 IF PS'3 THEN BY=P/256 : GOSUB 

1240:BY-P-32768:G0SUB 1240;PRI 
NT" 'OPS; 

590 IF 0P>-1 THEN 740 
600 GOSUB 1260:ADS=CS:IF PS=3 T 
HEN PRINT " ' LEFTS(ADS. 10; 
610 ON -OP GOTO 620,630,660.730 
620 GOSUB 1860: IF NU=0 THEN BR ( 
Q3)=R:G0T0 330 ELSE 1050 
630 IF PS=3 THEN PRINT TAB(20); 
640 GOSUB 690:BY-^255ANDR:GOSUB 
1230 

650 IF BS-ADS THEN 330 ELSE 640 
660 IF PS-3 THEN PBINT TAB(20); 
670 GOSUB 690:BY-INT(R/256) :GOS 
UB 1230:BY=R-256*BY:GOSUB 1230 
680 IF BS=ADS THEN 330 ELSE 670 
690 NN-INSTR(ADS,".") :IF NN-0 T 



[. 



Did&ww^mi^fj/^ 




HEN BS"ADS:G0TO 710 

700 BS-I-EFTS[ADS,WN-1) :ADS-M1DS 

{ADS.NN+D 

710 IF LEFTS(BS.1)-'S" THEN B=V 

ALClH"+MIDS(B3.2))ELSE R-VAL{B 

3) 

720 RETURN 

730 GOSUB leeOrlF NU-0 THEN P-P 

+R:GOTO 330 ELSE 1050 

740 B-239:fF K2-0 THEN 1140 

750 GOSUB 1260:AD$-C?:IF PS-3 T 

HEN PRINT ' " LEFTa(AD5.9, ; 

760 IF K2>3 THEN 1040 

770 IF(K2<>3 OB (LEFTS (OPS. 2) -" 

LD-)) AND LEFT3(AD3.1)-*#' THEN 

AD3-MIDS<ADS.2) r DF-1 : OP-OP-48 : 
GOTO 1040 

780 IF RiaHTS(ADS.l)-"J" THEN A 
DS-«IDS(ADS,2.LEH(AD9)-2) :B-B+l 
6 

790 IF OP<52 OH OP>55 THEN 670 
800 K2-l:[l-0:AA3-ADS 
810 NN-INSTR(AAS, ".") :IF NN-0 T 
HEN US-AAS:G0TO 830 
820 US-LEFTS(AA$.NN-1) :AAS-MIDS 
(AAS.NN+1) 

830 IF US-RISHTSC0P3.1)THEN 320 
840 NN--1:F0R J-0 TO 9:IF US=-PU 
S(J) THEN NN-J 
850 NEXT: IF NN<0 THEN 320 
860 R-R ORPU(NN}:IF U3-M^S THEN 

1140 ELSE 810 
870 K2-3;C-INSTR(ADS.'.") :IF C- 
THEN 104.0 

eeO IF 0PO30 AND 0PO31 THEN 9 
50 

890 NN-INSTR(ADS. ' . ") :U3-LEFTSC 
AD$.NN-1) :GOSUB 930 :N1-H-1 ; IF H 
=0 THEN 320 

900 US-MIDS(ADS.HN+1) rGOSUB 930 
:N2-H-1;IF H-0 THEN 320 
910 IF(8ANDN1)<>(8ANDN2) THEN 3 
20 

920 a=16*Nl+N2:K2-l:G0T0 1140 
930 FOR J-1 TO 12:IF YSCJ).-U3 T 
HEN H-J 

940 NEXT: RETURN 

950 C2-C+l:F0R J-0 TO 12:L-LENC 
xSCJ)t;iF MiDS{ADS.c2.L)<>X3(J) 

THEN 980 
960 IF {B ORV(J)) AND 239<239 T 
HEN 320 

970 C2-C2-*-L:B"B AND U(J) :IF KK C 
J) THEN K2-KK[J1 -1 
9B0 IF J-9 THEN J2-C2:CZ-C2+(C2 
-1)"(K2<6) 
990 NEXT 

lOOO IF(15 AND B)-15 THEN B-B-6 
1010 IF PS-3 AND J2<-LEN(AD$)AN 
D K207 THEN PRINT " ERRO DE IND 
EXACA0":GOT0 330 

1020 IF(K2-0 AND C>2) 08 (MIDS C 
AD3+".'.J2.1)<>".") AND PS=3 TH 
EN PRINT 'ERRO DE ENDERECAMENTO 
■;G0TO 330 
1030 ADS-LEFTS{ADS.C-1) :IF J2-C 

THEN H-0: GOTO 1060 
1040 G0SU& 1860: IF NU-0 THEN 10 
60 

1050 IF PS-3 THEN PRINT" ENDERE 
CAMENTO NAO ENTENDIDO* 
11060 IF K2-7 THEN K2-3:GOTO lOS 




1070 IF K2>3 THEN B-R-P-2+ (0P>2 
55)+(B<>239)+(K2>4) :fi-H-( (K2-6) 
AND(H>-129}AND(R<128)) :K2-K2-3 
1080 IF B-239 AND K2-3 THEN KZ- 
ZiIF H<256 AND DF-0 THEN K2-l:0 
P-OP-32:IF(240 AND OP)-80 THEN 
OP-OP-BO 



1090 IF PS-3 AND((0P>31 AND 0P< 
48)0R 0P-141)AND(R<-128 OR H>12 
7) THEN PRINT ' DCSVIO FORA DE F 
AIXA"; :G0TO 330 
1100 IF B-25S THEN B-159:K2-2 
1110 IF B0239 THEN 0P-OP-16rIF 
K2-3 THEN K2-2:IF ABS(B+.S)<i2 




8 THEN K2-1 :B-B-l:H-255 AND H 

1120 IF(15 AND B)-e AND B=0 THE 

N B=B-4:K2-0 

1130 IF{31 AND B)-8 AND (B<16 

R R>239) THEN B- (B-136)OB [31 AN 

D B) :K2-D 

1140 IF PS-3 THEN PRINT TAB(20) 




1150 IF OP->0 THEN BY-0P/256:G0 

SUB 1220 :BY-OP:G0SUB 1230 

1160 IF B0239 THEN BY-B:GOSUfl 

1230 

1170 IF K2-0 THEN 330 

1180 GOSUB 120Q:IF K2=2 THEN BY 

■B/256;GOSUB 1230 

1190 BY-R-2S6«INT(R/256) :GOSUB 

1230:GOTO 330 

1200 IF PS=3 THEN PRINT " ": 

1210 HETUBN 

1220 IF INT<By)=0 THEN HETUHN 

1230 P=P+1:IF PS=3 THEN POKE P- 

1,255 AND BY 

1240 BY-255 AND BY : IF PS-3 THEN 

PRINT RIGHT3("0" + HEXS(BY) .2) ; 
1250 HETUHN 

1260 IF K>N THEN CS-"END" :RETUH 
N 

1270 K1-K9+1:IF K9>-LEN (TS (K) ) 
THEN CS-" FALTA MNEMONICO" : BETU 
RN 

1280 K9-K1:IF MIDS !T5{K) .Kl.D- 
' - THEN 1270 

1290 IF K9>LEN[TS(K))THEN CS-MI 
DSCTSIK) .K1.K9-K1) :HETURN 
1300 IF MlDS[Ta(K) .K9,1K>" " T 
HEN K9-K9+l:GOT0 1290 
1310 CS-MID$(TStK) ,K1.K9-K1) :HE 
TURN 

1320 IF K9<-LEN(TS [K) ) AND PS-3 
THEN PRINT RIGHTS ( TS (K) . LEN (TS ( 
K))-K9tl) ; 

1330 K-K+1:K9-0:IF PS-3 THEN PR 
INT 

1340 RETURN 
1350 XS-"" 

1360 IF CS<'A" OR CS>-"[" THEN 
1380 

1370 XS-XS+LEFTS(CS,11 :CS-MIDSC 
CS.21 :GOTO 1360 
1380 IF CS<>'" THEN HETUHN 
1390 FOn Q2-1 TO VV:IF XS-Z3 (Q2 
} THEN 1410 

1400 NEXT:VV-VV+l:ZStVV)-XS:Q2- 
W;Rri(Uy)-23000 
1410 RETURN 

1420 CLS:M0TOaON: PRINT #161, "PO 
SICIONE O GRAyADOB, PRESSIONE Q 
UALQUEB TECLA E APERTE <PLAY>." 
1430 US-1NKEY$;IF US="" THEN 14 

30 

1440 OPEN'I" .1-1 , "ASH" :PRINT" C 

ARBEGANDO PROGRAMA" : INPUT t-l.N- 

:FOR J-1 TO N:INPUT *-l,T3(J):N 

EXT:CLOSE #-l:RETURN 

1450 CLS:MOT0RON:PRINT #161. 'PC 

SICIONE GRAVADOR , APEBTE < 

RECORD> E PRESSIONE QUALQUEB 

TECLA." 

1460 US-INKEYS:IF US-"" THEN 14 

60 

1470 OPEN"0".»-1, "ASM-:PHINT" G 

BAVANDO PROGE^AMA"; PRINT |-1,N:F 

OH J-1 TO N:PBINT |-1 .TS ( J) :NEX 

T:CLOSE #-l:RETUBN 

1460 PRINT |-1,N:F0H J-1 TO N:P 

BINT»-1.TS(J) : NEXT :CL0SE|-1: RET 

URN 

1490 PBINT " INTHODUZA NUMEHO 

DA LINHA (LI NNAS NUKEHADAS DE 

DEZ EM DEZ)" 



1500 INPUT K:CLS 

1510 K2-K/10:IF K2>N THEN K2-N+ 

1:N-N+1:TS(K2)-"':PHINT #460,"" 

1520 IF K2C.1 THEN K2- . 1 

1530 IF K2-INT(K2) THEN 1S50 

1540 K2-INT(K2)+1 :FOB K3-N TO K 

2-1 STEP -1:TS(K3+1)-TS(K3) :N£X 

T:N-N+1:TS(K2)="" 

1550 P1=1478;P0=P1 

1560 PBINT e448.K;TAB(6)TSCK21 : 

P9-P0+LEN(TS(K2} ) 

1570 IF PKPO THEN Pl-PO 

1590 IF P1>P9 THEN Pl-Pl-1 

1590 P8-PEEK{P1) :POKE PI, 63 AMD 

P8 
1600 P7-0:AS-INKEY3:IF AS"'" TH 
EN 1600 

1610 IF AS=R3 THEN POKE P1.P8;R 
ETUBN 

1620 IF AS=CHBS(9) THEN POKE PI 
,P8 ■Pl=Pl+l -GOTO 1580 
1630 IF AS'CHRS (8) THEN POKE PI 
,P8:P1'-P1-1:GOTO 1570 
1640 IF AS=OHRS(10) THEN AS""": 
GOTO 1670 

1650 IF AS-CHRS(94) THEN AS=' " 
+HIDS(TS(K2) .Pl-PO+1.1) :P7''-1:G 
OTO 1670 

1660 IF AS<" " THEN 1600 
1670 IF P1-P0+1>LEN(TS(K2) ) THE 
N TS tK2)-LEFT3(T3[K2) ,P1-P0)+A3 
:C0TO 1690 

1680 TS(K2j -LEFTS [TS(K2) , Pl-PO) 
+AS+RIGHTS(TS(K2) .LEN(TS(K2) )-p 
1+PO-l) 

1690 P1-P1-(LEN(A3)>0)+P7;GOTO 
1560 

1700 PRINT e32."":K-K*10:GOTO 1 
510 

1710 IF N=0 THEN CLS^PBINT" NAD 
A A APAGAR":FOR C-1 TO 1000 :NEX 
T:BETURN 

1720 CLS: PRINT* INTBODUZA NO DA 
LINHA [LINHAS NUMERAD 

AS DE DEZ EM DEZ)" 
1730 INPUT K:K2-K/iO 
1740 IF K2>N OR K2<1 OB K20INT 
(K2) THEN PRINT" ESTA LINHA NAO 

EXISTE":RETUHN 
1750 K-K2;F0R K3-K2 TO N:TS(K3) 
-T3(K3+1) :NEXT:N-N-1:PBINT «95. 
K"10!- ";TS[K) :HETUBN 
1760 IF N-0 THEN PRINT " NADA A 

LISTAR":FOB C-1 TO 1000:NEXT:B 
ETURN 

1770 PRINT" INTBODUZA NO DA 
PRIMEIHA E DA ULTIMA LINHA (L 
INHAS NUMEBA-DAS EM MULTIPLOS 

DE 10)" 
1780 INPUT K,K2:K-INT(K) : K2-INT 
[K2) :K1-K/10;K2-K2/10 
1790 IF K2>N THEN K2-N 
1800 IF KKl THEN Kl-1 
1810 IF K2<K1 AND K2-N THEN HET 
URN 

1620 IF K2<K1 THEN CLS:PHINT " 
CONJUNTO DE LINHAS INUALID0":GO 
TO 1770 

1830 CLSiPBINT e96.;:F0R K3-K1 
TO K2:PBINT K3"10" "TS<K3):NEXT 
1840 BETUBN 
1850 K-K2-K1:K1-K2*1:K2-K1+K:IF 

N-0 THEN 1760 ELSE 1790 
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I860 NU-0 :R-0 

1S70 S-L 

1S80 IF ADS-"' THEN BETURN 

1890 XS"LErTS[ADS. 1) iBDS-MIDS^A 

DS.2>:IF XS-'*' THEN R-fi-»-P*S:AD 

S-BD3:G0T0 1870 

1900 IF XS-'+" THEN AD$-BD3:G0T 

1880 

1910 IF XS-"-" THEN ADS-BDSiS — 

S:GOT0 1880 

1920 Q=0:1F X$<>"»" THEN 1950 

1930 IF BDS>-'0" AND BDS<"2- TH 

EN 0=a«2*ASC(BDS) -48;BDS=MID5(B 

DS, 2) :GOTO 1930 

1940 R-H+Q-S: ADS- BDS: GOTO 1870 

1950 IF XS<>"S" OB BDS<"0' OR B 

DS>"F" THEN 1980 

1960 Q2-VAL(-lH"+LEFTS(BDS.l)) : 

BD$-MIDS(BDS.2) lO^-Q'ie+QZ :XS-LE 

FTS(8DS.l) 

1970 IF<XS>"/" AMD XS<":") OB ( 

X5>"e" AND KS<:"G") THEN L960 EL 

SI B=B+Q«3:AD5-BDS;G0T0 1870 

1980 IF XS<"A" OR XS>"Z" THEN 2 

010 

1990 C5-ADS:G0SUB 1350:IF CS<>" 

- GOSUB 1390 

2000 R-H+RR{Q2)''S:ADS-CS:G0T0 1 

670 

ZOtO IF XS<'0" 0H'XS>"9" THEN B 

=0:NU-1:RETURN 

2020 IF ADS>"/'" AND ADS<";" THE 

N Q'Q"10+ASC(ADS)-48:AD3=rHDS (A 

DS.2) :GOT0 2020 

2030 R"H-('S''Q:GOTO 1870 



COMO FUNCIONA PR06RAMA 



Nao se esque?a de reservar um espa- 
(o suficienle de memoria para seu pro- 
grama, usancfo CLRAR antes de 
roda-lo. 

Para introduzir o seu programa pres- 
stone a tecla E. Ele pedira eniao um nii- 
mero de linha. Neste programa cada ins- 
irij;;ao em mnemonico deve ser introdu- 
zida em uma linha de BASIC. E preci- 
se lambeni que os niimeros de linha se- 
jam muluplos de 10 e cada linha conte- 
nha apenas um comando Assembly com 
seus respectivos operandos. 

A primeira linha deve abrigar o en- 
dereijo inicial da por?ao da memiria on- 
de sera colocada a rotina em cddigo. E 
necessario que esse enderetjo esteja na 
area reservada por CLEAR. Para espe- 
cificar sua origem, usamos o comando 
ORG seguido do endereco inicial. 

Se um enderei;o inicial nao for espe- 
cificado, o programa leniara posicionar 
o Assembler a partir do endere?o 35000, 
que perience a memoria ROM, O resul- 
tado nao sera satisfatorio, uma vez que 
nao se pode colocar codigos na ROM. 
O programa precede assim para evitar 
que o As&embler seja colocado em uma 
Irea prejudicial ao funcionamenlo da 
miquina. Quando o endereco acima e 



usado, programa comunica: "origem 
nao enconlrada". 

Normalmente, sao utilizados os mne- 
monicos padrao do 6809. Niimeros he- 
xadecimais devem ser precedidos de $ 
(cifrao). niimeros binaries, de '^o {por* 
cento). Algarismos sem prefixo sao con- 
siderados decimais. 

Alguns Assembler para o TRS-Coloi 
reconhecem codigos ASCII, se esles fo- 
rem precedidos de ' (ap6st]-ofo) ou 1 
(panto de esclamacao). Nao e o caso de 
nosso programa. Assim, o comando 
FCC, que manipula caracteres ASCII, 
nao pode ser usado. 

Para editar linhas, empregue as teclas 
do cursor. As setas "direiia" e "esquer- 
da" movimentara o cursor ao longo da 
linha; a seta "para cima" inserc e a se- 
ta "para baixo" apaga. 

A ultima linha do programa deve ser 
END; o Assembler criara uma linha des- 
se lipo. caso esquei;amos de faze-lo. 

Se. depois de digitarmos uma linha, 
pressionarmos outra lecta que nao EN- 
TER, o programa voltara ao menu. Se 
entao pressionarmos L, os mnemonicos 
serao listados para uma conferencia. 

Caso liaja algum erro, retorne ao me- 
nu e pressione E. Especifique entao o 
numero da linha a ser corrigida. 

Se qui.'iermos inserir uma nova linha 
entre duas ja exisienles, devemos entrar 
no modo de edicao e dar a ela um nu- 
mero iniermediario. Uma nova listagem 
mostrara a nova hnha no lugar correto, 
sendo que loda^ as linhas lerao niimeros 
multiplos dc 10. Apenas uma linha de ca- 
da vez pode ser Jnserida dessa maneira. 

Para apagar uma linha, retorne ao 
meny e pressione D, Especifique entao 
o numero da linha a ser apagada. Quan- 
do nao houvcr mais modificagoes a fa- 
zer, retorne ao menu e pressione A. O 
programs em Assembly sera entao "mOn- 
tado" na memoria, Quando o proces,so 
terminar, o endere*;o final do programa 
cm codigo sera mosirado na lela, 

A optao de gravacao — leda S — 
grava apenas o programa em Assembly 
ou programa /ante. Para gravar o As- 
sembler, use o caminha normal. Para 
gravar o programa cm codigo — ou pro- 
grama ohjelo — e necessario sair do As- 
sembler usando a lela BREAK: 

CSAVEM -NOME'. IMICIO, FIM, 
DEFEXEC 

NOME 6 a denominagao do progra- 
ma; INICIO e o endereco inicial defi- 
nido por ORG; e FIM, o enderego final 
fornecido pelo programa ap6s a 

montagem. 

O ultimo mimero, DEFEXECdizao 
TRS-Color por onde comeijar a execu- 
tar a rotina em codigo. Geralmenie, ele 




COMO ENCONTRAR ERROS EM 
PROGRAMAS LONGOS 

Mesmo o ptogramador mais expe- 
riente tefS problemas em djgitar progra- 
mas longos como esse Assembler. Nao 
Importa a destreza de seus dedos; fa- 
talmenie, em algum lufjar, um erro se- 
ra cometjdo, 

MuJlos desses erros sao enconfra 
dos quando se confere a Ijslagem. As 
mensagens de erro do micro ajudarao 
tamb^m, se procurarmos saber o que 
significam, 

Tais mensagens. cofitudo, podem 
nao ser suficientes para detectar o lo- 
cal de um erro em um programa mutto 
longo, Nesses programas, uma linha 
pode ser execuiada sem problemas 
muitas vezes, so vjndo e provocar um 
erro quando oma variSvel assumir um 
valor incompativel devido a um erro de 
digitapao comelido em outra parte do 
programa. 

Felizmente, o TRS-Color conta com 
uma fun^ao de rastreamento — (race 
— que tacilita 3 localizacao de erros, 

Tal funijao e ativada pelo comando 
IRON, que deve s-er usado no modo 
jmedialo. sem numeto de linha, Quan- 
do rodamos o programa, ela nos mos- 
tra o numero da linha que estS sendo 
executada. 

Para desaliwar a funcao de tastrea- 
menlo, use o comando TROFF, 



e igual ao enderci,-o inicial. Agora pode- 
mos moniar qualquer programa a par- 
tir de sua listagem em Assembly. 



UM TESTE 



Para testar o Assembler, digite o pro- 
grama de deslocamento da tela para a 
direita apresentado napagina219. Esse 
programa resultard nos seguintes 
codigos: 

8E Ofi 00 E6 62 34 D4 C& IF A6 
82 A? 01 5A 26 F9 35 04 E7 84 

8C 04 00 2E EA 39 

Em algumas das mdqumas compati- 
veis com o TRS-Color e possivel aumen- 
tar a velocidade do programa acrescen- 
tando POKE 65495,0 no inicio da linha 
180. Se isto for feito, devemos modifi- 
car outras linhas a fim de que a alta ve- 
locidade nap prejudique a gravacao em 
fita. Assim, adicione POKE 65494.0 ao 
inicio das linhas 1420 e 1450. 



L 


r 


LINHA FABRICANTE 


MOOELO ■" FABfllCANTE 


MODELO 


PAIS 


TB.-^ 






App1ell4 Applelrcnica 


Thoi 2010 


Appletronica 


ThorMIO 


Brasil 


Apple 11+ ■ 




ApplelU CCE 


MC-400a Exalo 


Apply 


Apply 300 


Brasil 


- SjnclalrZX-ei ■ 




Appleii+ CPA 


Absolulus 


CCE 


MC'4000 ExatO 


Brasil 


Ji^plell+ -M 




ApplBll+ CPA 


Polaris 


CPA 


Absolut us 


Brasil 


Apptall4 ■ 




Applell+ DIsilus 


DGT-AP 


CPA 


Polaris 


Brasil 


Apple ll-t- 9 




Appiell+ Dismac 


D-aioo 


Codlmex 


cs-esoa 


Brash 


TRS-Color " 




Applell* ENIAC 


ENIAC II "- 


Digitus 


DGT'IOO 


Brasil 


TBS-80 Mod.lll 




Applell+ Fcanktin 


Franklin 


Digitus 


DGT-1000 


Brasil 


TRS-eO Mod.lll 




Apploll* Houslon 


Houston AP 


Digitus 


DGTAP 


BraBll 


Apple ll-t- 




ApplAli-)- Magnei: 


DM 11 


Dismac 


D-eooo 


Brasil 


TRS-60Mod. 1 




Applsll+ Maillranlca 


MX' 2001 


Dismac 


D-SDOKS 


Brasil 


TRS-aOMod.l 


Kl 


Applall+ Maxilronica 


MXW 


Dismac 


D-eioo 


Brasil 


Apple 11 + 




Apple II -•- Maxiironlca 


MX'64 


Dynacom 


MX-1600 


Brasil 


TRS-Color 




Z Applall-)- MsxMronlca 


Maxitronlcl 


ENIAC 


ENIAC II 


Bra ell 


Apple 11 + 




^ Applell* Microcralt 


CralllPlus 


Engebras 


AS'1000 


Bratll 


Sinclair ZX-81 




1 
u Applell-f Milmar 


Apple II Plus 


Filcres 


NEZSOOO 


Brasil 


Sinclair ZX-ai 




■ Apple 11+ Milmar 


Apple Master 


Pianklin 


Franklin 


USA 


Apple 114- 


1 1 


Applell+ Milmar 


Apple Senior 


Gradlente 


Expert GPC1 


Brasil 


MSX 


) 


Apple II + Omega 


MC-4D0 


Houslon 


Houston AP 


Brasil 


Apple 11+ 


A 


Applell+ Polymax 


Maxxl 


Kemltron 


NalaSOO 


Brasil 


TRS-ao Mod.lll 


m 


Applell+ Polymax 


Poly Plus 


LNW 


LNW'SD 


USA 


TRS-80 Mod. 1 


■ 


Apple 11+ Spectrum 


MICFoengenliol 


LZ 


Color 64 


Brasil 


TRS-Color 


■ 


Applell+ Spectrum 


Speclruin ed 


MagneK 


DM II 


Srasll 


Apple It -t 


w 


Apple ll-t- Suporte 


Venus II 


Mail Iron lea 


Mx■saa^ 


Brasil 


Apple 11+ 




Apple II 4- Sycomlg 


SICI 


MaxltronlcB 


MX-48 


Brasil 


Apple II + 




Applell+ Unltron 


APII 


Maxltronica 


MX-e4 


Brssil 


Apple 11+ 




Apple 11+ Victor do Brasil 


ElppallPlus 


Ma xl Ironies 


Msxltronlc 1 


Brasil 


Apple II + 




Apple 11 + Victor do Brsetl 


Elppa Jr. 


Microcralt 


CrattllPlus 


Brasil 


Apple II -K 




Apple lie Microcraft 


era II He 


Microcralt 


Catt ll« 


Braall 


Apple He 




Applelle Mlcrodigilal 


TK-3000lle 


Microdlgltal 


TK-30Ca lie 


Braiil 


Apple He 




Apple lie Spectrum 


MIcroBftgentio II 


Microdlgltal 


TK-aac 


Brasil 


Sinclair ZX-81 




Msx Gradiente 


Eipert GPC-1 


Microdlgltal 


TK-83 


Brasil 


Sinclair ZX-81 




MSX Stiarp 


HolbllHB'BOOO 


Microdlgltal 


TK-B5 


Brasil 


Sinclair ZX-81 




Sinclair Spectrum Mlcrodlgital 


TK-90X 


Microdlgltal 


TK-90X 


Brasil 


SinctalrSpectrum 




SinctalrSpectrum Tlmei 


Timex 2OD0 


Microdlgltal 


TKS-flOO 


Brasil 


TRS-Color 




Sincli>lrZX.ei Apply 


Apply 300 


Milmar 


Apple 11 Plus 


Braell 


Apple 11 + 




Sinclair ZX-S1 EngebraE 


AS-1001} 


Milmar 


Apple Ma slef 


Brasil 


Apple 11 + 




Sinclair ZX-81 Filcres 


NEZ'SOOO 


Milmar 


Apple Senior 


Brasil 


Apple 11 + 




Sinclair ZX-ai Mlcrodigilal 


TK-82C 


Multlx 


MX'Compacto 


Brasil 


THS'80Mod.lV 




Sinclair ZX-S1 Microdlgltal 


TK-83 


Omega 


MC'400 


Brasil 


Apple 11 + 




Sinclair ZX-ai Microdlgltal 


TK-B5 


Poly man 


Maxxl 


Braall 


Apple 11 -t- 




SinctslrZX'SI Prologlca 


CP-200 


Polymax 


Poly Plus 


Brasil 


Apple 11 + 






Sinclair ZXm Ritas 


Ringo R-470 


Prologlca 


CP-ZOD 


Brasil 


Sinclair ZX-B1 






1 


Sinclair ZXai Timex 


Timex 1000 


Prologlca 


CP.30D 


Brasil 


TRS-80 Mod.lM 




1 


Sinclair ZX-B1 Tlmei 


Timex 1500 


Prologlca 


CPMO 


Brasil 


TRSColor 




1 


TRS-aOMod-l DIsmae 


D.BOOO 


Prologlca 


CP500 


Biaslt 


TRS-SO Mod.l 11 






TRS-SOMod-l Dlsmac 


D'B0D1J2 


Ritas 


RlngoR'470 


Brasil 


Sinclair ZX'Sl 




1 


TRS-80Mod.l LNW 


LMW-BO 


^arp 


HotbitHB'8000 


BrsstI 


MSX 






TRS-ao Mod. 1 Video Genie 


Video GenlQl 


Spectrum 


MIcrosngenno 1 


Brasil 


Apple II + 






TRS-SO Mod.111 Digitus 


OGT-100 


Spectrum 


Mlcroengenho II 


Brasil 


Apple He 






TRS-eO ModJII Digitus 


DGT-1000 


Spectrum 


Spectrum ed 


Brasil 


Apple H + 




TRS-SD MDd.lll Kemltron 


Nb|bSDO 


Suporte 


Venus II 


Stasll 


Apple 11 + 






TRS-80 Mod.lll ProJoglca 


CP'300 


Sycomlg 


SICI 


Brasil 


Apple 11 + 






TRS-80 Mod.lll Prologlca 


CP-SOO 


Sysdata 


Sysdata III 


Brasil 


TRS-SD Mod.lll 






TRS SO Mod-lll Sysdata 


Sysdata 111 


Sysdata 


Sysdata IV 


Srasll 


TRS'80 Mod.lV 




I 


TnS-80MDd.lll Sysdata 


Sysdata Jr. 


Sysdila 


Sysdets Jt. 


Brasil 


TRS-80 Mod.lll 


s \ 


TRS'SOMDdJV Mullix 


MX-Coffl pacts 


Timex 


Timai 1000 


USA 


Sinclair ZX 81 


TRS-SO Mod.lV Sysdata 


Sysdata tV 


Timex 


Timex 1500 


USA 


Sinclair ZX-81 


1 


TFIS'Color Codlmex 


cs-65as 


Timex 


Timex 2000 


USA 


SinctalrSpectrum 




THS- Color Dyne com 


MX-ie(H 


U nitron 


API! 


Brasil 


Apple 11 + 




TRS'Color LZ 


Color U 


Victor do Brasil 


Elppa II Plus 


Brasil 


Apple 11 + 




TRS-Color Microdlgltal 


TKS-SOO 


Victor do Brasil 


Elppa Jr. 


Brasil 


Apple II + 




' 


THS' Color Prologlca 

. 1 


CP-400 


Video Oenie 


Video Genie 1 


USA 


TRS-80 Mod. 1 






1 
1 1 


INPUT foi especlaimente projetado para 


^ 


-J 


rS" 1 


\Hi 




1) 




H_H TRS-BD L 


MaZJ TK20(W ' 


AM MSX 






linhas existenles no metcado. 

Os blocos de textos e listageis de programas aplicados ^^^ 




Quando o emblema tor seguMo dc unta 
/ faiia, etttSo tanto o tetlo coma os 


1 


■J 
1 


apenas a deteiminadas linhas de mtcms podem ser 
identificados por meio dos s^uintes sIiiiddIos: 


^^■fl Spednini 


l_| TRS-CnIar L 


tm programas que u vxiKm assam a m 
SKJ Aprlifl espKificas para a rioRa intTcada. 























PROGRAMApAO BASIC 

Os computadores sSo capazes de executar milhoes de operagoes 
I6gicas por segundo. Veja como isso funciona. 

PROGRAMAQAO DE JOGOS 

Incorpore objetos ao programa de aventura e enriqueija seu 
vocabul^rio com novos verbos. 

PROGRAMApAO BASIC 

Aprenda a localizar e a corrigir os erros de um programa h 
medida que eles aparecem e evite dores de cabepa. 



C6DIG0 DE MAQUINA 

Figuras moveis produzidas no Apple e no ZX-81. 
Como movimentar os desenhos. 



COfAP" 



,1^00ttS 



CURSO 



prM\co 



.c6o\GO 



DE ^A/^Q^' 




